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Titel Cass. / Disk. 
Action Biker 330 7 —— 
Colony 3.0 
Gristal Rider 30 7 —— 
Despatch Rider 3.0 1 
Gun Law 3.00 !—— 
Hower Bower 2.00 7 —— 
Loco 900 7 — 
Kik Start 3,90 7 —— 
Master Chess 3.0 
Molecule Man 3.0 7 — 
One Manandhis Droid 3.90 —— 
Vegas Jack Pot 3.00! —— 
BMX Simulator 14.90 / —.— 
LastW.8 14.30 7 —— 
LA S.WAT. 14.90 / —— 
Ninja 14.90 / —— 
Space GBunner 14.80 [— 
Spellbound 14.30 7 —— 
Red Max 14.30 7 — 
Canon Glimber 135.0 7 
Designmaster —.— / 19.80 
Shooting Arcade 15.30 7. — 
Actzec 19.90 /’ 29.90 
Boulderdash Il 19.30 / 29.90 


Gohens Tower’C. Tunnels 19.30 / —— 





Mr. Robot 19.90 ! 29.30 
Nightrider/Ardy 19.90 / —— 
Spy vs Spy 19.30 / 29.90 
Tale of Beta Lyrae 19.30 / 29.90 
Bilbo —,— / 193.90 
Jurio First — — /’ 18.8 
Max Wells Demon —.— /’ 18. 
Mike's Slotmachıne — — / 19.00 
Nibbler —— /’ 13.50 
Pyramidos —.— / 29.00 
Tales of Dragons —,— / 19.00 
Soundmachine —— / 2950 
Arkanoid 25.0 / 39.30 
Space Lobsters 25.90 ! 39.90 
Sprong 25.90 / 39.90 
Starquake 25.90 / —— 
Gauntlet 25.90 ’ 39.90 
Asylum V—— 
Boulder Dash 

Construction Kit 25.0 / 39.90 
Fighter Pilot 25.90 / 39.90 
Ghostbusters 25.90 / 39.90 
(aoonies 25.90 / 33.90 
Hacker 25.90 / 39.90 
Hardball —.— /’ 350 


DM = 29. 90 


Titel Cass. / Disk. 
International Karate 25.090 / 39.90 
Koronis Rift —— ./ 33 
Leaderboard 25.90 / 39.30 
Montezuma’s Revenge 25.90 / 393.0 
Folar Piere 25.90 ! 39.90 
Rescue on Fractalus 25.90 ’ 39.90 
Spy vs Spyll 25.90 / 39.90 
Super Huey | 25.30 / 39.90 
Tornahawk 25.00 / 39.90 
Trailblazer 25.90 / 39.90 
Spindizzy 25.0 / 37.90 
Grid Runner 3.00 ! —— 
Stratosphere 3.00 
Colossum Chess 4.0 25.90 / 37.90 
P.O.D. 3.0 
Micro Rythm 193.30 7 —.— 
Power Down 500 
Invasıon 25.30 — 
Astro Droid 25.90 /’ 29.90 
Footballer ofthe Year 25.90 / 39.30 
Mutant Camels 2.90 —— 
Frenesis 3.0 [en 
River Ralley 14.80 7 —.— 
Eubble Trouble 2.00 


Doppelpack 
Cass. + Disk = 19.90 pro Spiel 


Glowns+ Ballons, Moonshuttle, 
Pooyan, Sea Bandits, 
Spider Quake 


StArMxPrL+E+R+S 


* Greatest Hits vol. 1 


Astro Chase - Bristles 
Flip + Flop 


pm 29.90/34.90 










* 4 great Games 


Jet Set Willy - Balloonacy 
Pengon - Wizard 


Cass. pm 19.90 


— [—— 





Cass 9, 90 


* Der Versand mit den teuflischen Preisen! « 


42 -Nummer: 0 7252/8 66 98 
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Case 25, 90 
ee 39, 90 


2»  Mercenary Kompendium (dtsch.) 
33.90 / 39.90 








2» The Living Daylights 
—.— / 39.90 





I)» Head over Heels 


25.90 / 39.90 
>» Auto Duell 
— 1 UG- 
>» Ultima IV 
rn HG 


Software-Bestellschein 


Ich bestelle aus dem Diabolo-Versand folgende Software: 
USA No 352-42-CLN 


Harn des Einsteller: 





Datum Unterschrift 


Ich wünsche folgende Bezahlung: 

[I Nachnahme (zuzüglich 5.70 DM Versandkosten) 

U Vorauskasse (zumüglich 3- DM Versandkosten, 
ab 100 OM Bestellwert versandkostenfrei) 

Bei Vorauskasse bitte Scheck Geilegen, 


Coupon ausschneiden, auf Postkarte kleben 
und einsenden an: 

Diabolo-Versand, PF 1640, 7518 Bretten. 
Eins Abteilung des Verlags Aätz-Ebarle Geb 


ie waren sich alle einig, die Soft- 

warehäuser, die Hardwareher- 

steller und Entwickler, die Händ- 
ler, die Fachjournalisten und sogar 
Atari selbst: »Der Atari XU/XE ist tot«. 
Schließlich war (und ist) der C64 der 
bislang erfolgreichste Heimcomputer 
aller Zeiten. Für Atari schien die ein- 
zige Zukunft nach den Wirren der 
Übernahme durch Jack Tramiel in der 
neuen ST-Linie zu liegen. 

Nur noch einige eingefleischte 
Freaks und ausdauernde User-Clubs 
hielten ihrem XU/XE die Stange. Die 
immer kleiner werdende Gemeinde 
bombadierte unsere Redaktion mit 
Leserbriefen: »Bringt doch mehr über 
den Atari XL«. Keine leichte Aufgabe 
für uns. Wir bemühten uns dennoch, 
die Wünsche unserer Leserschaft zu 
erfüllen. Aus der Listingflut der ersten 
Jahre war allerdings leider ein immer 
dünneres Rinnsal geworden. Die Pro- 
duktion des XL/XE wurde eingestellt, 
die Händler verkauften ihre Restpo- 
sten nur noch mühsam. Die Preise fie- 
len. Alles schien klar: Der Atari XL ist 
tot. 

Und plötzlich beginnen die Ver- 
kaufszahlen zu steigen. Auf der CeBit 
'87 kann Alwin Stumpf, deutscher 
Atari-Chef, stolz 92000 verkaufte XL 
vermelden. Der Erfolg überraschte 
Atari derart, daß geplant ist, den 800 
XL im Gehäuse eines 130 XE neu auf- 
zulegen. Weiterhin werden von Atari 
Anstrengungen in Richtung Software 
unternommen. In diesem Jahr wird 
eine große Werbekampagne für die 
»kleinen Ataris« erwartet, ein XL-Com- 
puter als Spielconsole kommt zu 
Weihnachten. Der Atari XL lebt! 

Im großen Atari-Schwerpunkt in 
Ausgabe 7/87 von Happy-Computer 
konnten es die Freaks aus dem berufe- 
nen Munde Alwin Stumpfs hören, daß 
sie an dieser Entwicklung nicht unbe- 
teiligt waren: »Wenn es nicht die 
Clique der Atarianer gegeben hätte, 
die ihren Computer leidenschaftlich 
vor aller Welt verteidigten, wären die 








Totgesagte 
leben länger 


kleinen Computer niemals wieder so 
populär geworden.« 

Bereits das erste XL/XE-Sonderheft 
von Happy-Computer war ein durch- 


schlagender Erfolg. Das »Turbo- 
Basic« des späteren GFA-Basic-Pro- 
grammierers Frank Östrowski (Listing 
des Monats in Happy-Computer) ist 
heute Quasi-Standard aller Listings für 
die 8-Bit-Atarıs. Sogar jenseits des 
Atlantik. Wer regelmäßig amerikanische 
Atari-Zeitschriften liest, wird dort immer 
wieder Programme finden, die in Turbo- 
Basic geschrieben worden sind. 

Mit diesem Sonderheft wollen wir 
dieser Entwicklung noch mehr Durch- 
schlagskraft verleihen. Unter dem 
Motto »Professionell programmieren« 
ist dieses Sonderheft ein Nachschla- 
gewerk für alle, die auch noch das 
Letzte aus ihrem Atari XL herausholen 
wollen. Wenn Sie die ausführlichste 
Übersicht über alle XL-Hardware- 
Register suchen, die je in einer 
deutschsprachigen Zeitschrift er- 
schienen ist, wenn Sie Grundlagen 
zur Grafikprogrammierung brauchen, 
eine Kassettenversion von Turbo- 
Basic vermissen oder 256 Farben 
gleichzeitig darstellen wollen: Sie fin- 
den es hier. 

Für die Anwender unter Ihnen lie- 
fern wir unter anderem ein Zeichen- 
programm, einige Super-Spiele zum 
Abtippen und einen Zeichensatzgene- 
rator. 

Wenn Sie übrigens ein Spiel oder 
eine Anwendung programmiert 


haben, schicken Sie sie uns. Jeden 
Monat warten in Happy-Computer 
3000 Mark auf den Programmierer 
des »Listings des Monats«. 

(Henrik Fisch) 
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1UP 002610 ir das = Round 8 ® XL tiefgekühlt: 
- | Ein Freezer für den XL 14 | 


Von jeher wurde der Atari als Spielemaschine eingesetzt. Die- 
ses Talent und seinen Ruf als Spielemaschine hat er sich bis Ein Laufwerk wird fröhlich: 


heute bewahrt. Vier neue Spiele für die XL/XE-Computer . | 5 : | 
erwarten Sie ab Seite £ | Diskettenbeschleuniger im Test 18 | 


go e_ „® 
Grafik-Listings 
® Der XL treibt’s ganz schön bunt: 
256 Farben auf dem Bildschirm 21 





Zeichensätze selbsigestrickt: 
Zeichensatzeditor 35 


Ein toller Malkasten: 
Universelles Malprogramm 41 


® 3D-Grafik in Turbo-Basic: 
Denkanstöße für dreidimensionale Grafiken 47 


Benutzerfreundliche Programme: 
Menüs einfach gestalten 55 





Nicht nur zum Einfrieren von Programmen, sondern auch als 
ultimatives Programm-Entwicklungswerkzeug dient der 


brandneue Turbo-Freezer XL. Einen ausführlichen Test dieses A nwendungs-Listings 


Hardwaäare-Zusatzes finden Sie auf Seite 14 


Prüfsummer paßt auf: 
Der Prüfsummer für Basic 60 


Ampel-Version 1.1: | 
Der Prüfsummer für Maschinensprache 63 | 


@® Auf die Kassette, fertig, los! 
Turbo-Basic auf Kassette 66 


| Wenn die Kassette mit der Diskette...: 
| Maschinenprogramme auf Kassette 67 


| Basic, schnell wie der Wind - 
| mit dem Turbo- BERNER 68 


ASS - klein, aber fein: 
Zeilenassembler zum Abtippen 83 





Ein Traum wird wahr: Endlich lassen sich auf dem Bildschirm | Pisketten-Quartett: 

alle 256 Farben der Atari-Computer gleichzeitig darstellen. | Yier nützliche Programme 86 
Ein Malprogramm und ein Mandelbrot-Programm nutzen de | ———— 7 
Farbenvielfalt. 21 et 











Spiele-Listings 


® Asteroiden-Action: 
Futuristisches Puzzlespiel 


® Die Horror-Höhle: 


Entdeckungsfahrten mit Hubschrauber 


@® Die Macht des Geistes: 
Strategiespiel für zwei Spieler 


® Ein Käfer auf Wanderschaft 


Kampf um den Kriegsplaneten 


®| 


Grundlagen 


@ Im Inneren des Computers: 
Komplette Registerdokumentation 
Grafikzauberei: 
Programmierung von Display-Lists 
Als die Farben laufen lernten: 
Display-List-Interrupts 


| Die Handschrift des Computers: 


| Aufbau von Zeichensätzen 


Dom, im Hintergrund: 
VBLANK-Interrupts 


Neues aus den USA 


Software 


® Komponieren ohne Noten: 
Musik-Compiler im Test 


Pascal mit Assembler-Power: 
Pascal-Compiler 


Der Star unter den Textverarbeitungen: 
Star-lexter 


2 
Basielei 
Atari verbindlich: XL-ST-Interface 


Cursortasten selbstgemacht: 
Vier Cursortasten im Eigenbau 


ı Verschiedenes 





| Einleitung 


Impressum 


® Titelthemen 


90 


94 


105 
108 
111 


143 


145 


147 


149 | 


154 


Zeitren-hssembler srien-nassembler 
£<c3 1955 Artware 
& Peer Johäannsen 
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Mit unserem in Turbo-Basic geschriebenen Zeilen-Assembler 
lassen sich ohne Probleme kleine Programme schreiben und 
austesten. Ideal ist er für die Demonstrationsprogramme die- 
ser Ausgabe. 53 





Selbstverständlich haben wir wieder Spiele für jeden Ge- 
schmack in diesem Heft abgedruckt. Ob Sie nun lieber Action- 
oder Denkspiele mögen, hier finden Sie hochkarätige Spiele 
zum Abtippen. 90 





Diese Ausgabe ist als handfestes Nachschlagewerk für die 
Grafik-Programmierung gedacht. Display-Lists, Zeichen- 
sätze und verschiedene Interrupts sind keine Rätsel mehr. 
Zusätzlich erhalten Sie die Registerdokumentation. 120 








| eit entfernt, in einer frem- 
den Dimension haben Wis- 
senschaftler eine bizarre 


Welt entdeckt, die frei im Raum 
schwebt. Niemand kann sich erklären, 
woher sie kommt und wozu sie da ist. 
Fest steht jedoch, daß sie aus lauter 
geometrischen Formen besteht. Um 
diese Welt zu erkunden, wird sofort 
nach einem waghalsigen Mitarbeiter 
gesucht, der den Flug zu dieser 
Dimension und eventuell auftretende 
Gefahren nicht scheut. Da Sie mal 
wieder knapp bei Kasse sind, melden 
sie sich für den Auftrag. 

Sie werden entsprechend ausgerü- 
stet und zum Abflughangar gebracht, 
wo Ihr Raumschiff auf Sie wartet. Als 
Sie es erblicken, trifft Sie fast der 
Schlag. Das Raumschiff ist von so 
alter Bauart, daß Sie glauben, es 
müsse jeden Moment auseinanderfal- 
len. Es sieht wie eine auf den Kopf 
gestellte Pyramide aus und besitzt 
zudem es ein völlig überholtes 
Antriebssystem. Dieses läßt das 
Raumschiff ständig um die eigene 
Achse rotieren, um so den nötigen 
Schub für eine Vorwärtsbewegung zu 


Se 
a 


Fi 


Wie kommt man an den Diamanten ran? 


erzeugen (wer sich das wohl wieder 
ausgedacht hat). Widerwillig steigen 
sie in das Fahrzeug und fliegen los. 
Als Sie bei der Ebene ankommen, 
zeigtsich Ihnen ein fantastisches Bild. 
Wie die Wissenschaftler geschildert 
haben, besteht alles aus geometri- 
schen Formen. Die quadratische Flä- 
che, auf der Sie sich befinden, hat 
nach allen Seiten Ausgänge und in der 
Luft schweben schimmernde Diaman- 
ten. Als Sie einen der Diamanten 
berühren, gibt es einen klirrenden 
Laut, und der Diamant ist verschwun- 
den. Dafür sehen Sie aber, daß sich Ihr 


6 





Eine neue, gut gelungene Um- 
setzung macht seit kurzer Zeit 
von sich reden: Spindizzy. Das 
Spiel wurde vom Schneider 
CPC so gut umgesetzt, daß 
jedem XL/XE-Freak das Herz 
höher schlagen dürfte. 


Treibstoffvorrat erhöht hat. Insgesamt 
können Sie auf diese Weise Treibstoff 
für 150 Sekunden in Ihrem Fahrzeug 
lagern. Als Sie sich dem Diamanten 
nähern, stellen Sie eine weitere Un- 
zulänglichkeit Ihres Gefährts fest: Die 
Bremsen funktionieren nicht. Um zu 
bremsen, müssen Sie also entweder 
genau entgegengesetzt zu Ihrer Fahrt- 
richtung Schub geben oder Sie benut- 
zen die Notbremse (die <SPACE>- 
Taste am Computer). Mit dieser kommt 
Ihr Fahrzeug augenblicklich zum Still- 
stand. Dafür verbraucht diese jedoch 
bei jeder Betätigung den Treibstoffvor- 
rat einer Sekunde, und Treibstoff ist 
kostbar. Ohne ihn bleibt Ihr Fahrzeug 
stehen, und Sie sind mutterseelen- 
allein auf der Ebene gefangen, ohne 
je wieder zurückzukehren. 


ee 


[ee IHREN 





Bizarr geformte Klippen wechseln mit 
unebenem Gelände, endlosen Ab- 
gründen und Eiswüsten ab. Dann gibt 
es wieder Gebiete, die an eine Achter- 
bahn erinnern oder die befürchten las- 
sen, ineinem Labyrinth ohne Ausgang 
gefangen zu sein. 

Interessant sind auch die verschie- 
denen Fahrstühle, mit denen Sie in 
andere Ebenen getragen werden. 
Einige dieser Fahrstühle lassen sich 
nur mit in den Boden eingelassenen 
Schaltern aktivieren, bei manchen 
sind gleich mehrere dieser Schalter 
notwendig. Schließlich entdecken 
Sie auch, daß Sie nicht allein in die 
ser Welt sind. Unbekannte Wesen 
huschen in bestimmten Gegenden 
umher Schnell merken Sie jedoch, 
daß diese Wesen es einzig und allein 
auf Ihren Treibstoffvorrat abgesehen 
haben. Mit der Zeit fangen Sie an, sich 
Gedanken über den Sinn dieser Welt 
zu machen. Wer hat sie geschaffen 
und welchen Zweck soll sie erfüllen? 
Wer weiß, vielleicht lüften Sie das 
Geheimnis. 

Spindizzy wurde zuerst für den 
Schneider CPG geschrieben, dann 





Steile Klippen machen die Erkundung schwierig 


Diese Gedanken schieben Sie 
jedoch entschlossen beiseite und 
machen sich auf den Weg. Leicht tor- 
kelnd undschwankend fahren Sie eine 
Rinne entlang und finden sich kurz 
darauf auf einem Gelände wieder, das 
zum großen Teil mit Wasser überflutet 
ist. Ein schmaler Weg führt durch die 
Fluten zum Festland. Gerade rechtzei- 
tig können Sie noch die Notbremse 
ziehen, um nicht im Wasser zu versin- 
ken. Wie nicht anders zu erwarten, 
kann Ihr Fahrzeug natürlich auch nicht 
schwimmen. Weiter führt Sie die 
Reise durch die fremde Landschaft. 





auf den C64 konvertiert und ist nun 
auch in einer Version für die Atari-8- 
Bit-Computer erhältlich. Wenn auch 
die Grafik keine so detaillierte Darstel- 
lung wie auf dem CPC erlaubt, so ist 
Spindizzy doch eine rundherum ge- 
lungene Umsetzung. Einen großen 
Vorteil hat jedoch die etwa halb so 
feine Auflösung der XL/XE-Computer: 
Die Bildschirme werden wesentlich 
schneller aufgebaut und die einzelnen 
Objekte bewegen sich fließender. 
Spindizzy ist seine 2990 Mark auf 
Kassette beziehungsweise 39,90 Mark 
auf Diskette vollkommen wert. (hf) 
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©. Hartwig 
| Atari ST für Insider 
1987, 299 Seiten, inkl. Diskette 
Systemprogrammierung unter TOS und GEM: Grafik- 
routinen in G, Quick-Reference-Guide mit BIOS-, XBIOS- 


und GEM-DOS-Funktionen, Systemadressen und Speicher- 


belegung, Tips und Tricks. 
Best.-Nr. 90423 

ISBN 3-8909%0-4238 

DM 49,-/sFr 45,10/65 382,20 


—. P.Rosenbeck 
_ = C-Programmierung unter TOS/Atari ST 
1986, 376 Seiten 
Einführung in »C=. Systemprogrammierung am Beispiel eines Dis- 
ee kettenmonitors. Einsatz von BIOS-Routinen. Software-Engineering. 
x Best.-Nr. 90226 
ISBN 3-89090-226-X 
ST DM 52,-/sFr 4780/65 405,60 


In dem 





J.M uus/W. Besenthal 


Be Atari ST Programmierpraxis GFA-BASIC 2.0 


1987, 344 Seiten, inkl. Diskette 

Tips & Tricks zu 3-D-Grafik, Formular- und Fenster- 
verwaltung, umfangreiches Befehlsverzeichnis, 
Beschreibung des Compilers, Einbindung von 
Betrebssystem-Routinen. 

Best.-Nr. 90435 


MER ISBN 3-89090-435-1 





| P.Wollschläger 
Atari-ST-Assembler-Buch 
1987, 300 Seiten, inkl. Diskette 
Ein 68000-Kurs mit vielen Beispielen. Mit Tips 
für das Einbinden von Assemblerroutinen in 
Hochsprachen und ausführlichen Verzeichnis Es 
aller GEM-DOS-, BIOS- und XBIOS-Funktionen, 
| Best.-Nr. 90467 Bi 
ISBN 3-89090-467-X 
, DM 59,-/sFr 54.301065 460,20 


R,Aumiller/D.Luda 
Programmieren mit 


Forth Atari ST 


1987, 531 Seiten, inkl, Diskette 
Einführung in Forth. Ausführliche 
Darstellung der Programmierung 
unter GEM. Nutzung der Grafik- 
befehle, Sprites und GEM-TOS- 


Aufrufe. 


p Grafik 
rogrammierung von Grafik & Sound Best.-Nr. 90237 


ma, auf dem Atari ST 
ET 1987, 383 Seiten, inkl. Diskette 
" Srafik NT TR Vermittelt dem Pascal- und C-Programmierer 
N ‚quf dem Atari SI die Grundlagen zu einer erfolgreichen Grafik- 
en oe ı und Soundprogrammierung auf dem Atari ST. 
Beschreibung der Grafikhardware und eine 
= ausführliche Besprechung der im TOS imple- 
mentierten Grafikroutinen. 
Best.-Nr. 90405 
Ze ISBN 3-59090-405-X 
Se Ten |. erh ee we; HE 4 RS iz 
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ISBN 3-89090-237-5 
DM 49,-/sFr 45,10/58 392,20 








TH DH 2! DM 52,-/sFr 4780/85 405,90 


PWollschlaeger nd 
Atari ST Programmierpraxis 
ST Pascal 

1997, ca.250 Seiten, 

inkl. Diskette 

Eine strukturierte Anleitung 
zum professionellen Pro- 
grammieren unter ST Pascal 
(Plus). Mit vielen Beispielen 
‚für Line-A-Grafik, Sprites, 
Multitasking, GEM- 

und maschinennahes 
Programmieren. 

Best.-Nr. 90490 

ISBN 3-89090-490-4 

DM 59,-/3Fr 54.301565 460,20 





Ä Markt&Technik- Produkte erhalten Sie bei Ihrem | 


e { Buchhändler, in Computer-Fachgeschäften oder in den $ 
Fachabteilungen der Warenhäuser. 


——n | 


Irrtümer und Änderungen vorbehalten. Ä 4 | er | x 2 sr 
Markt&Technik 
Zeitschriften - Bücher 


Software - Schulung 
Markt &Technik Verlag AG, Buchverlag, Hans-Pinsel-Straße 2, 
8013 Haar bei München, Telefon (089) 4613-0. 
SCHWEIZ: Markt& Technik Vertriebs AG, Kollerstrasse 3, CH-6300 Zug, Telefon (042) 415658, 
ÖSTERREICH: Rudolf Lechner&Sohn, Heizwerkstraße 10, A-1232 Wien, Telefon (0222) 677526, Ueberreuter 
Media Handels- und Verlagsges.mbH Großhandel, Alser Straße 24, "A-1091 Wien, Telefon (0222) 481538-0 


nn — 


#" Fragen Sie bei Ihrem 
7 Buchhändler nach unserem 
kostenlosen Gesamtverzeichnis 
=> mit über 200 aktuellen 
7’ Computerbüchern und Software. 
Öder fordern Sie es direkt 
beim Verlag an! 














ie Idee zu dem etwas betagten 
»Breakout« ist wohl so alt wie 


die Heimcomputer selbst. 
Lange Zeit flimmerte das Spielchen in 
verschiedenen Abwandlungen über 
die Monitore aller Heimcomputer, bis 
esnach einiger Zeit in der Versenkung 
verschwand. 

Erst seit kurzer Zeit erlebt die alte 
Idee ein nie dagewesenes Comeback. 
Ausgelöst wurde das Breakout-Fieber 
in der Spielhalle: mit dern Automaten 
»Arkanoid«. Jetzt ist es endlich auch für 
die Atari 8-Bit-Computer erschienen. 

Die Idee von Arkanoid ist einfach. 
Sie haben einen Schläger, den Sie am 
unteren Bildschirmrand hin und her 
bewegen können. Mit ihm versuchen 
Sie, einen furios herumsausenden 
Ball zu treffen. Im oberen Bildschirm- 
drittel befindet sich eine Mauer, die Sie 
Stein für Stein abbauen müssen. 
Jedesmal, wenn der Balleinen Mauer- 
stein erwischt, löst sich dieser {in 
Wohlgefallen) auf und hinterläßt eine 
positive Spur auf Ihrem Punktekonto. 
Wenn Sie alle Mauersteine wegge- 
schossen haben, kommen Sie in 
einen neuen Level. 

Die Hintergrundstory zu Arkanoid ist 
beachtlich aufgemöbelt, aber eigent- 
lich recht überflüssig für das Spiel: 
Das Raumschiff Arkanoid wird von 
einer bösen Macht (von wem sonst...) 
in einer Raum-Zeitfalle gefangen 
gehalten. Nur die Raumkapsel »Vaus« 
hat es geschafft, zu entkommen. Und 
eben diese Kapsel ist der Schläger, 
den Sie bedienen. Ihr Ziel ist es, sich 
durch 32 Screens zu kämpfen, um das 
Mutterschiff wieder freizubekommen. 
Damit das richtige Raumschiff-Gefühl 
aufkommt, ist die Grafik recht abstrakt 
gezeichnet. 

Manchmal sind in den Mauerstei- 
nen Zubehörteile verborgen, die man 
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Arkanoıd 


Spielautomaten-Power gibt es 

auch auf dem Atari! Wer keine 

müde Mark mehr in die Spiel- 

hallen-Automaten investieren 

will, sollte sich Arkanoid für den 
XL/XE besorgen. 


mit dem Schläger einfangen muß. 
Diese Extras haben die Form von Ton- 
nen, die langsam nach unten fallen. 
Durch sie kommt Hektik auf. Wenn 
man nämlich nicht schnell genug ist, 
kann es passieren, daß man vor lauter 
Extra-Bonbons den Ball sausen läßt. 

Es gibt insgesamt sieben verschie- 
dene Zusätze, mit denen Sie Ihre Vaus 
ausstatten können. Ein »P« gewährt 
ein Extraleben. Wenn Sie ein »G« ein- 
fangen, klebt der Ball an dem Schlä- 
ger und kann so viel präziser wieder 
abgeschossen werden. Wenn Ihnen 
zuviel Hektik aufkommt, sollten Sie 
schauen, daß Sie ein »S« erwischen. 
Damit wird der Ball langsamer und 
somit leichter zu treffen. Besonders 
angenehm ist ein »L«, durch das die 
Vaus mit einem High-Speed-Laser 
ausgerüstet wird. Die Mauersteine 
sind damit in Nullkommanichts abge- 
raumt. 

Das »D« ist etwas für ganz beson- 
ders fixe Arkanoid-Spieler. Sobald Sie 
diese Tonne berühren, verwandelt 
sich Ihr Ball in drei kleinere Bälle. 
Natürlich treffen Sie jetzt dreimal so 
viele Mauersteine, aber Sie müssen 
auch drei Bälle gleichzeitig im Spiel 
halten! Mit »E« transformiert sich die 
Vaus in eine besonders breite 
Variante. Das wohl begehrteste Extra 
ist nach wie vor das »B«. Sobald Sie 
diese Tonne berühren, öffnet sich am 
rechten unteren Rand die Begren- 
zung. Wenn Sie mit der Vaus in die ent- 








EEE) IHM BE 


ER I Ze nlaizirs m 


standene Lücke hineinfahren, kom- 
men Sie automatisch in den nächsten 
Level. Daß dieses Extra nicht oft in 
einem Spiel vorkommt, versteht sich 
wohl von selbst. Oft anzutreffen sind 
dagegen der Kleber »G« und der 
»S«low-Modus. 

Aber auch mit diesen wichtigen Ver- 
günstigungen werden Sie schwer zu 
kämpfen haben, denn Arkanoid ist 
nicht einfach. Spätestens im dritten 
Level werden Sie Ihre Schwierigkeiten 
haben. Es tauchen Ziegel auf, die 
durch nichts zu vernichten sind. Auch 
ein Laser ist wirkungslos. Sie müssen 
schon genau zielen, um in den vierten 
Level zu kommen. Und es stehen 
Ihnen zweiunddreißig Level bevor ... 

Steuern können Sie Ihre Vaus mit so 
ziemlich allem, was Sie an Ihren Atari 
anschließen können. Keyboard, Padd- 
les oder Joystick stehen Ihnen zur Ver- 
fügung. Die Abfrage ist flott und rea- 
giert gut auf den Spieler. 

Grafisch gibt sich Arkanoid auf dem 
XL/XE etwas zwiespältig. Die Hinter- 
grundgrafik ist absolut dem Automa- 
ten nachempfunden und braucht sich 
nicht vor einem 16-Bitter zu ver- 
stecken. Auch die Vaus sieht recht 
chic auf dem Bildschirm aus. Etwas 
seltsam ist dagegen der Ball geraten: 
Vier mal acht Pixel hoch, hat er nicht 
das beste Aussehen aller Bälle dieser 
Welt erwischt. Haarsträubend verläuft 
leider die eckige Flugbahn: Man kann 
manchmal zusehen, wie der Ball wäh- 
rend des Flugs rechnet. Sobald aber 
die Geschwindigkeit während des 
Spiels zunimmt, verschwindet der stö- 
rende Effekt. Insgesamt kann man 
sagen, daß die Umsetzung für den 
XUXE sich nicht hinter anderen ver- 
stecken muß. Außerdem ist Arkanoid 
ein Spiel, von dem man sich nicht 
mehr so schnell losreißen kann. (al) 
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PROGRAn 
SERVICE 


Direkt bestellen statt Abtippen 








256 Farben gleichzeitig 
auf dem Bildschirm! 


Was Atari in der Werbung versprach und nur bedingt 
halten konnte, wird mit diesem Programm wahr 
emacht: Auf dem Bildschirm sind gleichzeitig alle 256 
arben des Computers darstellbar. Zwei Programme 
nutzen diese Möglichkeit aus: 
Paint256 
ist ein Malprogramm, mit dem in 256 Farben gepinselt 
wird. Neben den üblichen Funktionen zum Zeichnen 
von Punkten, Linien und Flächen besitzt es eine Funktion 
zum Einbinden von Text ins Bild und zum Dehnen oder 
Stauchen von Bildelementen. 


Apfel256 

berechnet die Mandelbrotmenge in 256 Farben. Ein 
unvergleichlicher Anblick aut dem Atari Computer! 
‚Arax: 

Ein Krieg zwischen den beiden wichtigsten Völkem des 
Universums ist ausgebrochen. Als junger Kadett starten 
Sie ein waghalsiges Untemehmen und deserfieren von 
Ihrer Einheit. Sie wollen dem unsinnigen Treiben ein Ende 
setzen und fliegen zu der Haupbasis des Feindes, um 
diese zu zerstören. Damit wären dann alle Probleme 
beseitigt. 

Helimann: 

In diesem Spiel fliegen Sie mit einem Hubschrauberruck- 
sack augerüstet durch unterirdische Höhlen. Jede 
Menge Gefahren lauem auf Sie, die Sie bewältigen 
müssen, um den Ausgang der Höhle zu erreichen. 







Zusätzlich ist im Spiel ein Editor enthalten, mit dem neue 
Höhlen entworlen werden. 

Paver: 

Ein Spiel für zwei. Sie fliegen mit einem Fahrzeug über 
eine mosaikartige Bee und versuchen, an pas- 
senden Stellen Steine einzufügen. Wer als erster die 
Stelle für den nächsten Stein findet, bekommt die Punkte. 
Grafik Draw: 

Ein Malprogramm für fast alle Grafikstufen der XLUXE- 
Computer. Eine Menüsteuerung macht die Bedienung 
extrem einfach. Fast alle Funktionen werden wahlweise 


“mit einem Joystick oder einem Grofik-Tablet gesteuert. 


Zusätzlich steht eine Hardcopy-Roufine zur Verfügung, 
die sich einfach an verschiedene Drucker anpassen läßt. 


Char Maker: 


Das. ultimative Zeichensatzprogramm. Alle wichtigen 
Funktionen werden über den Joystick gesteuert. Unter- 
stützt die Grafikstufen O, 1 und 12, mit Char Maker 
lassen sich also auch Farbzeichensätze editieren. 
Zusätzlich lassen sich die selbsterstellten Zeichensätze in 
eigene Basic-Programme einbinden. 

Weiterhin finden Sie Turbo Basic XL und alle weiteren 
Programme dieser Ausgabe auf der Diskette. 


2 Disketten für den Atari XL/XE 
Bestell-Nr.: 25720 
* 


DM 34,90 (sFr 29,50165 349,-*) 


*inkl, Mehrwertsteuer. Unverbindliche Preisempfehlung 








Markt&fechnik 


Zeitschriften - Bücher 
Software - Schulung 
Markt& Technik Verlag AG, Buchverlag, Hans-Pinsel-Straßbe 2, 8013 Haar bei München, Telefon (037) 4613-0 


Bestellungen im Ausland bitte an: SCHWEIZ: Markt&Technik Vertriebs AG, Kollerstrasse 3, CH-6300 Zug, Telefon (042) 415656 - ÖSTERREICH: Rudolf Lechner & Sohn, 
Heizwerkstraße 10, A-1232 Wien, Telefon (0222) 677526 - Ueberreuter Media Verlagsges. mbH [Großhandel], Alser Straße 24, A-1091 Wien, Telefon (0222) 481538-0. 





Weitere Programmservice-Angebote für Atari XEIXL 


Schnelleres Kopieren auf Atari- 
Laufwerken 

File-Copy: Benötigen Sie ein Programm, mit dem Sie schnell 
und komfortabel Sicherheitskopien Ihrer Dateien anfertigen kön- 
nen? vollen Sie Ordnung in Ihre Diskettensammlung bringen? 
Mit MFCOPY ein Kinderspiel. Zahlen mit Format: it die- 
ser Routine lassen sich in Turbo-Basic auf einfachste \Weise Zah- 
len runden und formatiert auf den Bildschirm bringen. Diese 
Funktion ist besonders nützlich für Programme, in denen statisti- 
sche oder kaufmännische Berechnungen durchgeführt werden. 
Tic-Tac-Toe: Als Endprodukt des Kurses Künstliche Intelligenz 
selbstgestrickt wurde dieses Programm vorgestellt. Dieses Spiel, 
bei dem Sie gegen den Computer antreten, veranschaulicht die 
professionelle Programmierung von Strategiespielen. Jump: 
Sie steuer einen Tennisball, der über eine durchlöcherte Ebene 
hüpft. Dabei müssen Sie jeden Sprung exakt vorausberechnen 
und obendrein noch einem Pfeil ausweichen, der sein Unwesen 
treibt. The Final Fight: In diesem fesselnden Action-Spiel 
müssen Sie Ihr notgelandetes Raumschiff gegen Angriffe vertei- 
digen. Die Bewohner dieses Planeten sehen Ihre landung als 
feindliche Kampfhandlung an und versuchen Sie mit allen Mit- 
teln zu vertreiben. Die Anleitung zu diesen Programmen finden 
Sie in den Ausgaben 4, 5, & und 7 der Happy-Computer. 

I Diskette für Atari-XL’XE-Computer 


Bestell-Nr.: 20707° DM 29,90* sfr 24,90/35 299,-* 


Turbo-Basic - 

Das Nonplusultra für Programmierer 
Turbo-Basic (12/85): Der schnelle Basic-Interpreter für den 
Atari-Computer. Auf der Diskette befinden sich je eine Version für 
den Atari 800XL und den Atari 800 mit mindestens 48 KByte 
RAM. Ampel (12/85): Atari-Moschinen-Programm-Eingabe- 
Listing. Atari-Prüfsummer: Eingabehilfe für alle in Hoppy- 
Computer veröffentlichten Basic-Programme. Jumper Il: 
Listing des 'Monats 8/84, um die Geschwindigkeit von Turbo- 
Basic zu demonstrieren. Magic-Painter: Listing des IMonats 
3/85. Ein Zeichenprogramm, das an Turbo-Basic angepaßt 


wurde. 
1 Diskette für Atari BOOXL/130XE/800. 
Bestell-Nr: LH8512B DM 29,90* sFr 24,90/55 299,-" 


Windows unter Turbo-Basic 


Turbo-Windows (9186): Fenstertechnik für Turbo-Basic. 
Drehkörper (9186): Ein schnelles Programm in Turbo-Basic 
zum Zeichnen von 3D-Funktionen. Labyrinth (3/87): Unser 
Listing des Monats März stellt wieder einmal die Krönung der 
Programmierkunst auf den Atari XE/XL-Computern dar. Sie steu- 
em eine Schlange durch ein labyrintn und sammeln Gegen- 
stände auf, ohne sich dabei selbst zu beißen. Morky (1187): 

Schlüpfen Sie in die Rolle unseres kleinen Helden und erforschen 
Sie insgesamt 35 Räume des labyrinths, um an Ihr Ziel zu gelon- 
gen! Mord im Computer (4/86): Als Mark Simpson versu- 
chen Sie, das Verschwinden Ihres Freundes aufzudecken. Far- 
ben gut gemischt (8/86): Mehr farben auf dem Bild- 
schirm. Laufschrift (10/86): Fehlt Ihnen ein Vorspann für Ihr 
neues Spiel? Kein Problem mit unserem Maschinenprogramm! 
1029 Hardecopy (10/86): Dieses Programm erledigt schnell 
und sauber Ausdrucke auf dem Atari 1029-Drucker. Diashow 
(11186): Zur Präsentation von computergenerierten Bildern. 
Nanoconverter (12186): Mit diesem Programm können Sie 
komfortabel und menügesteuert Ihre Spiele von Diskette in den 
Computer laden. Drucker-Kosmetik (2187): Deutsche 
Sonderzeichen und Unterlängen sind mit dem Drucker Atari 
1029 nicht ohne weiteres darstellbar. Diesem Nachteil wird hier 
zu leibe gerückt. Print-Sho en (2/87): Mit die- 
sem Programm in Turbo-Basic drucken Sie Ihre Grofiken über- 
sichtlich auf Papier. 

| Diskette für Atari-XL/XE-Computer 


Bestell-Nr.: 20708 DM 29,90* sFr 24,90/65 299,-* 


Grafik unter Turbo-Basic 


Turbo-Basic-Interpreter und -Compiler für Atari- 
Computer ® Apfelmännchen in Turbo-Basic ® Grafik unter 
Turbo Basic XL @ Daten komprimiert gespeichert e Disksorter 
® Submission [labyrinthspiel] ® Vorsicht Falle (Action-Spiel) ® 
Pacman mal 2 ® Zeichensatzumwandler ® Schnellader 


2 Disketten für Atari 800XL-/130XE-Computer 
Bestell-Nr.: 207038 DM 29,90* sFr 24,90/55 299,-* 


Auf der Suche nach dem 
schwarzen Gold 


Ölsuche (8/85): Spiel, ‚bei dem Sie mit dem Atari ST auf 
Ölsuche gehen. Atari mmer: Eingabehilfe für alle in 
Hoppy-Computer veröffentlichten Basic-Programme. Geröll- 
heimer (5/85): Spiel mit Screen-Editor und 20 fertigen Sze- 
nen. 24 Farben in Graustufe 0 (6/85): Routine für far- 
bige Schrift. Diskhelp (8/85): Für die schnelle Rettung. 
Autostart (9/85): Bosic-Programme starten automatisch. 
Dudu 4.0: Mehr Speicher mit der Floppy 1050. 

I Diskette für Atari SOOXL 


Bestell-Nr: IH8510B8 DM 29,90* sfr 24,90/85 299 ,-* 


Dappy- -Painter — 
omfortable Malprogramm 


Happy-Painter: Unser Listing des Moncts der Ausgabe 
3/85 ist ein Grafikprogramm, das sich mit anderen Malprogram- 
men dieser Art messen kann. Besonders gelungen ist die einfa- 
che Bedienung, da man mit dem Joystick sowohl im Haupt- als 
auch in den Untermenüs sämtliche Punkte anwählen kann. Der 
elektronische Malkasten verfügt über 16 IMenüpunkte und bietet 
eine Grofikaufläsung von 160x965 Pixel. Grafikdemo 
(3/85): Alle 256 Farben werden auf dem Bildschirm darge- 
stellt. Eine Farbspielerei, die die hervorragenden Grofikfähigkei- 
ten der Atari-Computer beweist [Roinbow-Effekt). Variablen- 
Dump (2185): Mit diesem Programm können Sie die verwen- 
deten Varioblen eines anderen Programms auf dem Bildschirm 
listen. Als die Bilder laufen lernten: Mit dem Utility 
Power-IMover können Sie laufende Bilder schnell und problem- 
los erzeugen. Statuszeile mit Uhr (1/85): Damit Sie beim 
Programmieren nicht die Uhrzeit vergessen, hilft nur eine ständig 
sichtbare Zeitanzeige. Mit diesem Programm können Sie eine 
zusätzliche Statuszeile oberhalb des Bildschirms generieren. 

I Diskette für Atar-Computer mit mind. 48 KByte RAM 


Bestell-Nr.: LH85038 DM 29,90* sFr 24,90/585 299 -* 


Die Jagd nach Gold, Juwelen 
und Diamanten 


Diamantenfieber: Unser Listing des Monats 2/85 ist eine 
wahre Schatztruhe. Bereichern Sie sich an bunt glitzernden Dio- 
manten, die überall in einem Be rk verteilt sind. Aber Vor- 
sicht! Die Stollen sind sehr instabil. Eine folsche Bewegung, und 
Sie werden von losen Gesteinsbrocken erschlagen. Ein Spiele- 
Designer sorgt bei unserer exzellenten Boulder-Dash-Variante 
für anhaltende Spannung. Die Schatzsuche (Ausgabe 
1185): Ver möchte sich nicht auch mit einem Schatz be- 
reichern? ‘Ver dazu nicht unbedingt eine \WVeltreise unter- 
nehmen möchte, kann mit seinem Atari BOOXL in eine Schatz- 
höhle eindringen. Gefährliche Tiere wie Skorpione, Ratten und 
Schlangen erschweren die Suche. Zeilenzauber (11/84): 
Die wichtige RENUMBER-Funktion fehlt leider im Standard- 
Basic-Editor des Atari. Dieses Programm beseitigt diesen 
Mangel. Jumper Il {Listing des Monats 8/84): Ein 
professionell gemachtes, in Basic geschriebenes Spiel. Ex- 
zellente Programmierung, ein High-Score-Zähler und ein ein- 
gebautes Demo werden selbst Zweifler schnell überzeugen. Aut 
musikalische Untermalung wurde großer \Wert gelegt, und die 
verschiedenen Screens sind brillant gemacht. Mop = Der 
Goldgräber (7134): Schnelligkeit und guter Sound zeich- 
nen dieses Spiel aus. Die Soundfähigkeiten sind wirklich hervor- 
ragend. Viele Bilder sorgen für Abwechslung. 

I Diskette für Atari-Computer mit mind. 48 KByte 


Bestell-Nr.: LH8502B DM 29,90* sFr 24,90/55 299,-* 
*inkl. Mehrwertsteuer. Unverbindliche Preisempfehlung 





PROGRAMMSERVICE 


Sie suchen packende Spiele, 
hilfreiche Utilities und ‚professio- 
nelle Anwendungen für Ihren 
Computer? Sie wünschen sich 
vr Software zu vernunftigen 
reisen® Hier finden Sie beides! 
Unser stetig wachsendes Sorti- 
ment enthält interessante Listing- 
Software für alle gängigen 
Computertypen. Jeden Monat 
erweitert sic a unser aktuelles 
Angebot um eine weitere inter- 
essante Programmsemmlung für 
jeweils einen Computertyp. 


Bestellungen bitte on: 
Markt & Technik Verlag AG, 
Unternehmensbereich Buch- 
verlag, Hans-Pinzel-Straße 2, 
D- 8073 Haar, Telefon (089) 
4613-0, Schweiz: 

Markt &Technik Ve AG, 
Kollerstrasse 2, a 00 Zug, 
Telefon [0.42] 4 15656, Oster- 
reich: Veberreuter Medio 
Handels- und Verlagsgesell- 
schaft mbH (Großhandel, 

Alser Stroße 24, A-1091 \Wien, 
Telefon (0222) 48 1538.0; 
Microcomput-iaue E. Schiller, 
Fasangasse 24, A-1030 Wien, 
Telefon (0222) 785661; Bücher- 
zentrum Meidling, Schönbrun- 
ner Straße 261, A-1120 Wien, 
Telefon (0222) 33 3198. Bestel- 
lungen aus anderen Ländern 
bitte nur schriftlich an: 
Markt&Technik Verlag AG, 
Abt, Buchvertrieb, Hans-Pinsel- 
Straße 2, D-85013 Haar, und 
gegen Bezahlung einer Rech- 
nung im voraus. 


Bitte verwenden Sie für Ihre 
Bestellung und Überweisung die 
eingeheitete Postgiro-Zohlkarte, 
oder senden Sie uns einen 
Yerrechnungs-Scheck mit Ihrer 
Bestellung. So erleichtern uns 
die Auftragsabwicklung, und 
dafür berechnen wir Ihnen keine 
Versandkosten. 








Die Kämpfer sind im Stadtpark... 

s geschah vor 500 Jahren, als 
Be. Bund der Zauberer noch 
über das Land herrschte. Er 
regierte das Land weise, gerecht und 
immer zum Vorteil des Volkes. Alle 
Gerechtigkeit, Güte und Weisheit ent- 
stammten einer Krone. Wer diese 
Krone aufsetzte, besaß alle Weisheit 
der Welt und konnte Dinge in der Ver- 
gangenheit und Zukunft erblicken. 
Kurz, die Krone war ein absolutes 
Machtinstrument. 

Ein Zauberer war für die Dauer einer 
vorbestimmten Zeitspanne dazu aus- 
erwählt, die Krone zu tragen und das 
Land zu regieren. 

Eines unglücklichen Tages kam es, 
daß derZauberer Tarmon an der Reihe 
war, die Krone an den nächsten im 
Bunde weiterzuleiten. Der dachte 
jedoch nicht daran, seine erworbene 
Machtstellung aufzugeben. So ent- 
brannte ein bitterer Kampf unter den 
Hexenmeistern, den nur wenige über- 
lebten. Häßliche Kreaturen bevölkern 
fortan die Ruinen der einst prächtigen 
Stadt Arghan, von der aus die Magier 
früher herrschten. 

Die letzten Zauberer versuchen ver- 
zweifelt, die Krone wieder an sich zu 
bringen. Kaitar, der älteste der übrig- 
gebliebenen, hat dazu einen Plan 
ersonnen. Er will unerschrockene 
Abenteurer anheuern, die versuchen 
sollen, die Krone den Händen Tar- 
mons zu entreißen. Falls sie ihre Auf- 
gabe erfüllen, warten Ruhm und eine 
so hohe Entlohnung auf die Abenteu- 
rer, daß ein Menschenleben nicht aus- 
reicht, das Geld auszugeben. 

Soweit zur Vorgeschichte von 
»Wizard’s Crown«, die anderthalb Sei- 
ten der 32 Seiten starken Anleitung 
zum Spiel in Anspruch nimmt. Viel zu 
lesen also für den Adventure- 
Begeisterten. 














„und müssen sich gegen Riesenspinnen wehren 


Ein neues Rollenspiel ist für die 

kleinen Atari-Computer er- 

schienen: »Wizard’s Crown«. 

Bei diesem Spiel, das ähnlich 

umfangreich wie »Ultima IV« ist, 

müssen acht Kämpfer eine 
Krone suchen. 


Wizard’s Crown ist ein Rollenspiel 
a la »Dungeons and Dragons«. Soviel 
wurde in der Vorgeschichte schon ver- 
raten: Man spielt mit mehreren Cha- 
rakteren gleichzeitig. Das ist auch 
einer der Gründe, warum man sich 
nicht als Einsteiger an das Spiel her- 
anwagen sollte. Bis zu acht Figuren 
sollen gleichzeitig kontrolliert werden, 
wobei die Anleitung nicht ohne trifti- 
gen Grund empfiehlt, zu Beginn des 
Spiels alle acht Charaktere zu nutzen. 
Das Spiel ist sonst zu schnell vorüber. 

Zu Beginn befinden sich alle Cha- 
raktere in einer Kneipe, in der sie sich 
von ihren Streifzügen ausruhen kön- 
nen, erbeutete Schätze und Waffen 
lagern, sowie im Falle des Äblebens 
eines Mitglieds einen neuen Äbenteu- 
rer anheuern können. Won hier aus 
startet die Kampfgemeinschaft, die 
Krone zu suchen. Am Anfang sollte 
man sich jedoch erst einmal auf die 
stadt beschränken. Hier gibt es schon 
genug zu entdecken. Schnell kommt 
es zu einem ersten Kampfmiteinerder 
zahlreichen Räuberbanden der Stadt. 
Der Computer stellt dann Kampfmög- 
lichkeiten zur Auswahl: Zum einen gibt 
es den schnellen Kampf. Hier über- 
nimmt der Computer alle Steuerfunk- 
tionen der einzelnen Charaktere und 
der Angreifer. Zum anderen gibt es 
den normalen Kampf. 

Zu Beginn des Gefechts muß sich 
die Gruppe erst formieren, um dem 





Angreifer mit maximaler Kampfkraft 
gegenüberzutreten. Zauberer sollten 
sich im Hintergrund halten, und Kämp- 
fer in vorderster Front stehen. 
Anschließend geht das Hauen und 
Stechen los. Jeder der acht Gruppen- 
mitglieder kann einen der Angreifer 
bekämpfen. Dabei spielt die Waffe und 
Rüstung des Angreifers genau so eine 
Rolle wie die Position des Gruppen- 
mitglieds zum Feind. Besitzt der Krie- 
ger zum Beispiel ein Schild, sollte er 
sich so hinstellen, daß der Feind links 
von ihm steht, daer dann einen Schlag 
des Angreifers mit dem Schild am lin- 
ken Arm abfangen kann. Insgesamt 
stehen 21 Funktionen während des 
Kampfes zur Verfügung. 

Haben die Gruppenmitglieder ein 
Gefecht überstanden, so bekommen 
sie Erfahrungspunkte, mit denen sie 
ihre verschiedenen Eigenschaften wie 
Wendigkeit, Umgang mit der Waffe, 
Ausdauer und Stärke verbessern. 
Zauberer brauchen magische Ener- 
gie, um ihre Kunst betreiben zu kön- 
nen. Nach einem Kampf geht es auch 
darum, den besiegten Feinden Waffen 
und Geld abzunehmen. Einige Waffen 
sind verzaubert und haben eine 
wesentlich verheerendere Wirkung 
als die Originalwaffen der Gruppen- 
mitglieder. Waffen, die die Kämpfer 
nicht gebrauchen können, lassen sich 
auf dem Markt zu Geld machen. Mit 
dem Geld wiederum können die Cha- 
raktere in einer Kneipe übernachten. 

Auch wenn das Spiel extrem kompli- 
ziert zu sein scheint (was es übrigens 
auch ist): Es bringt riesengroßen 
Spaß. Bis man die Krone gefunden hat 
und sie Kaitar zurückbringen kann, 
wird eine ganze Weile vergehen. Und 
fallsman sie wirklich finden sollte, eine 
Fortsetzung des Adventures ist in 
Planung. (hf) 
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Leader Board 


ei Leader Board hat man die 
Wahl zwischen drei Schwierig- 
keitsstufen, »Novice«, »Ama- 
teur« und »Professionale«. Bei letzterer 
spielen Faktoren wie Seitenwind und 
Anriß des Balls eine tragende Rolle. 
Diese Stufe sollte man wirklich nur 
wählen, wenn man schon länger Lea- 
der Board gespielt hat und in der 
Bedienung der vielfältigen Funktionen 
firm ist. Nach der Wahl des Schwierig- 
keitsgrades fragt das Programm nach 
der Anzahl und den Namen der Spie- 
ler. Bis zu vier Spieler können gleich- 
zeitig ein Spiel bestreiten, wobei das 
Programm vier verschiedene Kurse an 
zu spielenden Löchern zur Auswahl 
stellt. Kurs 1 ist der leichteste und 
sollte von dem Anfänger gespielt wer- 
den. Bei Kurs 4, dem schwierigsten, 
sind die einzelnen Bahnen so mit Was- 
serlöchern und Inseln gespickt, daßes 
arge Schwierigkeiten bereitet und 
hoher Genauigkeit bei der Dosierung 
des Schlages bedarf, um eine Bahn zu 
meistern. 

Das Spiel beginnt damit, daß ein 
kleines Männchen, zusammen mit der 
Ansicht der Bahn, aus der Perspektive 
des Männchens gezeichnet wird. Jetzt 





ea tig 


Mit der Anzeigetafel hat man immer den Überblick 


legt man mit dem Joystick mittels 
eines Kreuzes auf dem Bildschirm die 
Schlagrichtung fest. Ein kleiner Pfahl 
seitlich des Spielers informiert über 
die herrschende Windrichtung und die 
Windstärke. Der Schlag muß nun in 
dieser Richtung ausgeführt und so 
dosiert werden, daß der Wind kom- 
pensiert wird. Anfangs keine leichte 
Aufgabe, denn die Kontrollen bei Lea- 
der Board sind genauso kompliziert 
wie funktionsgerecht. 

Durch den ersten Druck auf den 
Joystickknopf legt man die Schlag- 
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Fond 





Sportspiele gibt es zur Genüge, 
auch für die kleinen Atarı- 
Computer. Trotzdem hat die 
Firma Access-Software ihre 
Golf-Simulation für diesen 
Computer umgesetzt. Das hat 
einen guten Grund, denn »Lea- 
der Board« ist bislang die am 
besten gelungene Golfspiel-Si- 
mulation, die es zu kaufen gibt. 


stärke, durch den zweiten Druck den 
Anriß des Balls fest. Je nach gewähl- 
tem Schläger fliegt der Ball nun eine 
bestimmte maximale Strecke. Die 
maximalen Schlagweiten der einzel- 
nen Schläger sind in dem Handbuch 
aufgeführt. Da der Computer ständig 
die Entfernung des Spielers zum Loch 
anzeigt, hat man mit aufgeschlage- 
nem Handbuch neben dem Computer 
schnell heraus, weichen Schläger 
man wählen muß. Ging der Schlag 
nun völlig daneben oder fiel der Ball 
ins Wasser, so gibt es einen weiteren 
Versuch von genau der gleichen Posi- 
tion aus. 

Ist der Ball dagegen auf dem Fest- 


land liegengeblieben, so wird ein 
neuer Bildschirm gezeichnet. Falls der 
Ball nun innerhalb eines Radius von 
64 Fuß zum Loch gelangt sein sollte, 
hat man nur noch einen Schläger zur 
Verfügung. Dieser »Putter« genannte 
Schläger ist dazu da, den Ball sachte 
ins Loch zu spielen. Je nach der 
Anzahl der Schläge, die man für eine 
Bahn benötigte, werden vom Pro- 
gramm Punkte vergeben: Für jede 
Bahn ist dabei eine bestimmte Anzahl 
Schläge vorgegeben. Braucht man 
weniger Schläge, werden Punkte 








dazugezählt, bei mehr benötigten 


"Schlägen werden Punkte abgezogen. 


Es kann also durchaus vorkommen, 
daß man am Schluß der 18 Bahnen 
eines Spiels eine negative Punktezahl 
hat. 

Beim Auspacken der Diskette fällt 
ein kleiner Stecker auf, der am Joy- 
stickport 2 aufgesteckt wird. Dieser 
Stecker, im Fachjargon »Dongel« ge- 
nannt, dient als Raubkopierschutz des 
ansonsten ungeschützten Programms. 
Das Programm fragt periodisch die- 
sen Stecker ab. Sollte er einmal wäh- 
rend des Spiels abgezogen werden, 
so wird der Bildschirm sofort mit 
wüsten Linien überzogen, das Pro- 
gramm verweigert in dem Fall die 
Arbeit. Bei der Diskette befindet sich 
eine 16seitige Anleitung, in der die 
besondere Bedienung des Spiels be- 
schrieben wird. Auch wenn den An- 
fänger die Bedienung des Spiels 
etwas kompliziert anmutet - hat man 
das Prinzip der Funktionen ersteinmal 
begriffen, ist die Bedienung kin- 
derleicht. 

Wie wohl alle Sportspiele bringt 
Leader Board mit mehreren Spielern 
wesentlich mehr Spaß als allein. Da 


= HOLE # 


= Fnnk 
;, LOURSE 





Golfbahnen aller Schwierigkeitsgrade laden zum Spielen ein 


die Simulation durch gute Program- 
mierung einen Bezug zur Realität her- 
stellt, kann man durchaus Geschmack 
auf richtiges Golfen bekommen. Die 
Grafik und die Kontrolle über die 
Schläge ist sehr gut. Leider fehlen wie. 
in anderen Versionen Bäume in den 
Bahnen. Trotzdem ist Leader Board 
ein Spiel, das immer wieder gerne her- 
vorgeholt werden wird. 

Leader Board ist auf Kassette und 
Diskette erhältlich und kostet 39 Mark 
in der Kassetten- sowie 59 Mark in der 
Diskettenversion. (hf) 











kommt der Tag, 
an dem mit den 
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Dann sollten Sie 
vorbereitet sein. 

»PC Magazin« ist der 
entscheidende Schritt 
zur professionellen 
Computeranwendung. 


PC Maaazin 


Die aktuelle Wochenzeitung für Per- 
sonal Computer im IBM-Standard. 

HI Wenn Sie an aktuellen und umfas- 
senden Informationen über IBM-PCs 
und kompatible Systeme interessiert 





_ sind # Wenn Sie stets über die neu- : 


esten und effektivsten Anwendun- 
gen für den professionellen und pri- 
 vaten Bereich informiert sein wollen 
BI Wenn Sie sich mit CAD/CAM und 
Netzwerken beschäftigen, dann ist 
das »PC Magazin« genau Ihre Zeit- 
schrift. 

' Zur Anforderung Ihrer kostenlosen 
Probeexemplare einfach denneben- 
stehenden Gutschein ausfüllen, aus- 
schneiden, auf eine Postkarte kleben 
oder in ein Kuvert stecken und ein- 
senden an: 

Markt & Technik, Verlag Aktienge- 
sellschaft, PC Magazin Abonnen- 
ten-Service, Postfach 1304, 

8013 Haar bei München. 
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Ich interessiere mich für »PC Magazine, die Zeit- 
schrift über IBM-PCs und Kompatible. Schicken 
Sıe mir vier Ausgaben kostenlos als Probeexem- 
plare. 


\Wenn ich »PC Magazın« nicht weiterlesen möchte, 
teile ich Ihnen dies sofort nach Erhalt der dritten 
Ausgabe mit, Gefällt mir »PC Magazin«, so daß ich 
es regelmäßig weiterbeziehen möchte, brauche 
ich nichts zu tun; Ich erhalte mein «PC Magazın« 
dann regelmäßig jede Woche per Post frei Haus ge- 
liefert und bezahle pro Jahr nur DM 155,— stattDM 
223,50 ım Einzelverkauf. Zustellung und Postge- 
bühren übernimmt der Verlag. 


Das Abonnement verlängert sich automatisch um 
ein weiteres Jahr zu den dann gültigen Bedingun- 
gen, wenn es nicht 2 Monate vor Ablauf schriftlich 
gekündigt wird. 


Dieses Angebot gilt nur ın der Bundesrepublik 
Deutschland einschließlich West-Berlin. Auslands- 
preise auf Anfrage. 
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" Datum, 1. Unterschrift 


Mir ist bekannt, daß ich diese Bestellung innerhalb 
von 8 Tagen bei Markt & Technik, Hans-Pinsel-Str. 
2, 8013 Haar widerrufen kann. Zur Wahrung der 
Frist genügt die rechtzeitige Absendung des Wi- 
derrufs. Ich bestätige dies durch meine 2. Unter- 
schrift. 


Datum, 2. Unterschrift 












XL tiefgekühlt 





Mit einem Freezer lassen sich 
Sicherheitskopien geschützter 


Programme anfertigen. Der 
»Iurbo-Freezer XL« bietet zu- 
sätzlich ein DOS, einen Monitor 
mit Disassembler, 256 KByte 
RAM und das Betriebssystem 
der alten Atari Computer. 


as ist ein »Freezer«? Ein 
Freezer (englisch ’to freeze’, 
einfrieren) ist ein Computer- 
zusatz, gleich ob Hardware oder Soft- 
ware, der ein beliebiges Programm im 
Computer anhält und auf Diskette 
oder Kassette speichert. Anschlie- 





Bend läßt sich das Programm wieder . 


laden und an genau der gleichen 
Stelle fortsetzen, an der es »eingefro- 


ren« wurde. Auf diese Weise läßt sich . 


von jedem Programm, das nicht wäh- 
rend des Laufens Teile nachlädt, eine 
sicherheitskopie anfertigen, auch 
wenn der Kopierschutz noch so qut 
ausgeklügelt ist. 

Für den C64 gibt es Freezer schon 
länger. Die Atarianer mußten auf die- 
sen nützlichen Zusatz jedoch bislang 
verzichten, da die interne Struktur der 
Atari 8-Bit-Computer es sehr kompli- 
ziert macht, Programme an einer 
beliebigen Stelle anzuhalten und 
ohne Veränderungen wieder zum Lau- 
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fen zu bringen. Bernhard Engl, der 
den Atarianern durch sein 
Turbo-1050-Modul für die Disketten- 
station bereits ein Begriff ist, hat nun 
einen Freezer für den XL entwickelt. 

Der Turbo-Freezer XL entpuppt sich 
als ein 8,5 mal 10,5 Zentimeter großes 
mit elektronischen Bauteilen vollge- 
packtes Platinchen, das hinten auf 
den Erweiterungsbus des XL aufge- 
steckt wird. An der Seite der Platine 
steht ein kleines Kabel ab, das die 
Stromversorgung des Freezers 
sicherstellt. Ans Ende des Kabels ist 
eine schmale Hülse angelötet. In der 
Anleitung wird darauf hingewiesen, 
daß der Turbo-Freezer XL ganz ohne 
Lötarbeit zu installieren ist. Deshalb 
wird die 5-Volt-Versorgungsspannung 
mit dem Kabel am Joystickport abge- 
griffen. Die Hülse wird zu diesem 
Zweck auf den unteren zweiten Pin 
von links an einem der beiden Joy- 
stickports aufgesteckt. Am Computer 
montiert, sieht der Freezer dann ein 
wenig abenteuerlich aus, denn die 
offene Platine steht ein gutes Stück 
über den Rand des Computerge- 
häuses hinaus, und das Kabel am Joy- 
stickport macht auch keinen sehr ver- 
trauenerweckenden Eindruck. Da 
hätte man sich doch ein stabiles 
Gehäuse für die Platine gewünscht. 
Mit Blick auf den Preis des Freezers 
darf man jedoch nicht meckern. 





Wenn man den Computer einschal- 
tet, merkt man zunächst überhaupt 
nichts vom Freezer. Wir waren im 
Basic-Modus, und der Computer mel- 
dete sich ganz normal mit »READY«. 
Auf der Freezer-Platine befindet sich 
ein auffälliger kleiner roter Knopf. 
Wenn man diesen drückt, erwacht der 
Freezer zum Leben und übernimmt 
das Kommando über den Computer. 
Der Freezer hat jetzt schon sämtliche 
Prozessor-Register und Hardware- 
Register gespeichert und die Werte in 
seinem RAM verwahrt. Man befindet 
sich dann im Hauptmenü des Free- 
zers. Dieses besteht aus sechs Funk- 
tionen, die durch einfaches Tasten- 
drücken aufgerufen werden. Zunächst 
gibt es die Funktion »Save extern«, mit 
der der gesamte Computerspeicher 
auf Diskette oder Kassette gespei- 
chert wird. Bei Diskettenbetrieb läßt 
sich zusätzlich bestimmen, ob ein vom 
DOS lesbares File erzeugt werden 
soll, oder einfach nur die Disketten- 
sektoren beschrieben werden. Um 
nicht allzuviel Platz zu verschwenden 
und die Lade- und Speicherzeiten in 
Grenzen zu halten, wird der Compu- 
terspeicher in einer kompakten Form 
abgelegt. Dieser Datenblock enthält 
auch sämtliche von Freezer zum Zeit- 
punkt der Aktivierung gesicherte 
Registerwerte. 


Sicherheit geht vor 


Mit»Exec extern« wird ein so gespei- 
cherter Datenblock wieder in den 
Computer geladen, sämtliche Regi- 
ster restauriert und das Programm an 
genau der gleichen Stelle fortgesetzt, 
an der es unterbrochen wurde. Wir 
haben einige Programme mit dem 
Freezer ausprobiert und konnten 
keins finden, das nach dem Auftauen 
nicht lief, oder das nach dem Starten 
irgendwelche Fehler zeigte. Mit dem 
Freezer hat man also die Möglichkeit, 
von kopiergeschützten Programmen 
Sicherheitskopien zu ziehen. Interes- 
santistauch, ein Spielan einer gefähr- 
lichen Stelle einzufrieren und zu spei- 
chern. Verliert man sein Spielerleben, 
kann man mit dem Freezer sofort an 
der gespeicherten Stelle weiterma- 
chen und muß sich nicht erst wieder 
durch sämtliche Gefahren kämpfen. 

Mit dem dritten Menüpunkt, »Zero 
OS RAM«, wird das RAM unter 
dem Betriebssystem gelöscht. Pro- 
gramme, die diesen Speicher nicht 
benutzen, werden dadurch in ge- 























AUFBRUCH IN EINE NEUE DIMENSION 


mit »68000er«, dem Magazin der neuen 
Computer-Generation 


>» Programmiersprachekurse für Basic, C, 
Modula und Assembler. 


» Bauanleitungen für professionelle Hard- 
ware-Erweiterungen. 


> Spiele-Spaß und -Spannung auf höchstem 
Niveau. 





Ihre hot-line zur Spitzentechnologie von 
AtariST, Amiga, Macintosh und Sinclair OL. 
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FOSTERAISSG UTSCHEIN. 
KOSTENLOS.  FUR EIN KOSTENLOSES PROBEEXEMPEAR 
FÜRSIE DES »68000er«-MAGAZINS 





eter High- JA, ich möchte »63000er«, das Magazin der neuen Compu- 

= ter-Generation, kennenlernen. 
Senden Ste mir bitte die aktuellste Ausgabe kostenlos als Pro- 
beexemplar. Wenn mir »68000er« gefällt und-ich es regelmäßig 
weiıterbeziehen möchte, brauche ich nichts zutun: Ich erhaltees 
dann regelmäßig frei Haus per Post. Außerdem nutze ich den 
Abonnement-Preisvorteil von 8% und bezahle pro Jahr nur 
77,— DM statt 84,— DM im Einzelverkauf. 


Vorname 
Name 
Straße 
PLZ, Ort 


Datum 1. Unterschrift 


Mir ist bekannt, daß ich diese Bestellung innerhalb von 8 Tagen 
bei der Bestelladresse widerrufen kann und bestätige dies 
durch meine zweite Unterschrift. Zur Wahrung der Frist genügt 
die rechtzeitige Absendung des Widerrufs. 


Datum _______ 2, Unterschrift 


Gutschein ausfüllen und absenden an: Markt&Technik Verag 3 
Aktiengesellschaft, Vertrieb, Postfach 1304, 8013 Haar - 
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Das relationale Datenbanksystem 
für Ihren Atari ST 


dBMAN ist ein leistungs- 
starkes und flexibles 
Datenbanksystem 


Ihre Daten werden damit relational aufgebaut 
und verarbeitet. Doch das ist noch nicht alles: 
Mit der integrierten, bedienerfreundlichen 
Programmiersprache von dBMAN entwickeln Sie 
Ihre individuellen Anwendungsprogramme. Sie 
erstellen Auftragsbearbeitungsprogramme und 
andere komplizierte Anwendungen. dBMAN ist 
zu dBASE Ill kompatibel. 

Als Umsteiger haben Sie dadurch die Möglich- 
keit, sofort mit JBMAN zu arbeiten. 


Leistungsmerkmale: 


O dBMAN erzeugt vollständige Datenbanken. 
Sie können auch im nachhinein ohne Daten- 
verluste die Struktur verändern und erweitern. 


O Sie verwalten Ihre Daten mit dem mitgeliefer- 
ten ASSISTlenten}, ohne zeitraubend ein Hand- 
buch wälzen zu müssen. 


O Das Zufügen, löschen, Verändern, Darstellen 


und Ausdrucken von Daten erfolgt aut einfache 
\Weise. 


CO Sie können bis zu 10 Dateien gleichzeitig 
öffnen, 2 Billionen Datensätze pro Datei ver- 
walten und eine unbegrenzte Zahl von Variablen 
verarbeiten. 


TOr2is 


Hardware-Anforderung: 


Atari ST mit mindestens 400 Kbyte 
freiem Speicher ([|Mbyte RAM 

oder 0,5 Mbyte und TOS im ROM), 
SM-124- oder SC-124-Monitor, 
mindestens ] Diskettenlaufwerk. 
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freezter und gespeicherter Form 
wesentlich kürzer. 

Der vierte Menüpunkt speichert ein 
eingefrorenes Programm nicht auf 
Diskette oder Kassette, sondern auf 
einer RAM-Disk. Auf der Freezerplatine 
sind zu diesem Zweck acht Sockel für 
RAM-Chips freigelassen, mit denen der 
Freezer in Schritten von 64 KByte auf 
256 KByte aufgerüstet werden kann. Mit 
64 KByte RAM auf der Platine hat man 
also den Speicher eines 130 XE zur Ver- 
fügung. Nach der Anleitung ist man 
damit jedoch nicht ganz 130-XE- 
kompatibel. Im 130 XE werden die 
zusätzlichen 64 KByte RAM in vier 
16-KByte-Bänken in den Speicher ein- 
geblendet. Der XE läßt sich nun so pro- 
grammieren, daß der Mikroprozessor 
und der Bildschirmprozessor auf 
unterschiedliche Seiten zugreifen 
können. Falls ein Programm diese 
Betriebsart ausnutzt, wird es nicht 
ohne weiteres mit der RAM-Erweite- 
rung des Turbo-Freezers XL zusam- 
menarbeiten. Zum einen gibt es 
jedoch bisher kein kommerzielles Pro- 
gramm mit dieser Betriebsart. Zum 
anderen ist in der Anleitung sehr 
genau beschrieben, wie man ein 
Kabel im Inneren des Computers so an 
den Erweiterungsbus anlötet, daß das 
Umschaltsignal zur Verfügung steht. 
Doch zurück zum Freezer-Menü. 
»Save Ramdisk« speichert wie »Save 
extern« den Computerspeicher mit 
allen Registerwerten. Das Gegen- 
stück dazu ist der Menüpunkt »Exec 
Ramdisk«, der aus der RAM-Disk ein 
Programm lädt, auftaut und startet. 


Register eingefroren 


Der sechste und letzte Menüpunkt 
läßt ahnen, welches Potential in dem 
Turbo-Freezer XL steckt. Wählt man 
den Menüpunkt »DOS/Debugger« an, 
hat man einen kompletten Monitor 
sowie ein komplettes DOS zur Verfü- 
gung. Mit dem Monitor lassen sich 
dann endlich dietiefsten Geheimnisse 
von Profiprogrammierern lüften. Für 
Leute, die beim Anblick von Program- 
men wie »Rescue on Fractalus« in 
andächtiges Staunen verfallen und 
bei denen sich im Kopf riesengroße, 
auf den Kopf gestellte Fragezeichen 
bilden, wenn sie gefragt werden, wie 
man so etwas programmiert, ist diese 
Funktion ideal. Ohne Probleme kann 
man nun ein in voller Aktion angehal- 
tenes Programm . untersuchen. Zu- 
sätzlich schaltet der Freezer automa- 
tisch das RAM unter dem Betriebs- 
system ein, damit man sich die dort 
stehenden Programme anschauen 
kann. Weiterhin ist der Freezer so kon- 
struiert, daß das eigentliche Freezer- 
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Der Freezer Prototyp. Die Serienmodelle werden mit Lötstopmaske geliefert 


Programm, sozusagen das Betriebs- 
system des Freezers, nicht sichtbar ist 
und auch keinen Speicherplatz im 
Computer belegt. Ein Programm be- 
merkt also niemals den Freezer und 
hat somit auch keine Möglichkeit, 
Gegenmaßnahmen einzuleiten. Dem 
Freezer und dem Monitor ist jedes Pro- 
gramm schutzlos ausgeliefert. Nach 
Belieben läßt sich ein Programm 
disassemblieren, verändern oder ent- 
schützen. Für eigene Programme ist 
der Monitor das ultimative Entwick- 
lungswerkzeug, da sich jedes Pro- 
gramm sofort beim Auftauchen eines 
Fehlers im Fehlerzustand unter- 
suchen läßt. 

Das eingebaute DOS stellt einen 
weiteren Knüller des Freezers dar. Ein 
Knopfdruck genügt, und es läßt sich 
mal eben schnell eine Diskette forma- 
tieren. Dabei gibt es jedoch einen klei- 
nen negativen Kritikpunkt. Jedes nor- 
male DOS schreibt nach dem Forma- 
tieren einer Diskette auf die ersten drei 
Sektoren ein Programm, das auf dem 
Bildschirm »Boot Error« ausgibt, wenn 
von der Diskette gebootet wird und 
sich kein DOS darauf befindet. Der 
Freezer tut dies nicht, weshalb sich 
der Computer aufhängt, wenn man 
versucht, von einer Freezer- 
formatierten Diskette zu booten. Wei- 
tere Folgen hat dies keine, es ist halt 
nur nicht besonders schön. 

Selbstverständlich werden Disket- 
ten in Single Density (90 KByte), 
Medium Density (130 KByte) und Dou- 
ble Density (180 KByte) unterstützt. 
Letztere allerdings nur mit einem auf- 
gerüsteten Laufwerk. Neben den 
Befehlen zum Formatieren von Disket- 
ten stehen Kommandos zum Anzei- 
gen des Inhaltsverzeichnisses einer 





Diskette, zum Schützen, Entschützen 
und Umbennen von Files sowie zum 
Laden und Speichern von Daten zur 
Verfügung. 

Auf der Freezer-Platine ist neben 
dem EPROM mit der Betriebssoftware 
des Freezers noch ein weiterer Sockel 
frei. Gleichzeitig befindet sich auf der 
Platine über dem roten Knopf ein 
Schiebeschalter. Blättert man in der 
Anleitung, so wird der Sinn des freien 
Sockels schnell klar: Hier läßt sich ein 
EPROM mit dem Betriebssystem der 
alten 400er/800er Computer von Atari 
einsetzen. Es gibt einige Programme, 
die mit dem Betriebssystem derneuen 
Computer nicht funktionieren. Da 
kommt das alte Betriebssystem im 
ROM sehr recht, denn damit hat man 
quasi einen alten Atari Computer und 
ab sofort keine Probleme mehr mit 
inkompatibler Software. 

Bei aller Euphorie hat der Freezer 
jedoch einen Nachteil: Er läßt sich nur 
am Atari 800XL betreiben, die Besitzer 
eines 130XE müssen vorerst noch auf 
eine Adapterplatine warten. 

Das alte Betriebssystem sowie die 
RAM-Disk in beliebiger Ausbaustufe 
kann gleich mitgeordert werden. Dazu 
schreibt man an: 

Gerald Engl 

Kennwort: Turbo-Freezer XL 
Bunsenstraße 13 

8000 München 83 

Der Freezer kostet 149 Mark, das 
alte Betriebssystem zusätzlich 10 
Mark und jede 64-KByte-Stufe der 
RAM-Disk 20 Mark. Wenn man sich 
anschaut, was der Freezer alles lei- 
stet, und dann seinen Preis mit dem 
von Konkurrenzprodukten vergleicht, 
kann man nur sagen, daß der Freezer 
ein echter Hammer ist. (hf) 


1/ 





Schneller, besser, komfortabler. 
Damit läßt sich kurz beschrei- 
ben, was das »Happy Drive 
Enhancement« aus der 1050- 
 Diskettenstation herausholt. 


as wäre ein Computer wie 
der Atari XL ohne eine Dis- 
kettenstation? Doch Disket- 
ten-Operationen bezahlt der Änwen- 
der oft mit langen Wartezeiten und 
umständlichem Kopierschutz. Diese 
Tatsache ließ die amerikanische Firma 
Happy Computers schon im Jahre 
1982 auf den Gedanken kommen, ein 
Hardware-Utility auf den Markt zu 
bringen, mit der diese Nachteile für 
den Benutzer aufgehoben werden. 
Die Entwickler nannten ihre Erweite- 
rung »Happy Drive Enhancement«. 
Diese Idee war von so durchschlagen- 
dem Erfolg, daß sie ın Deutschland 
einige Nachahmer wie »Speedy 1050« 
oder »Turbo-Modul« nach sich zog. 
Doch an das Original reichten diese 
Nachfolger nicht heran. Ein Grund für 
uns, den »Ur-Speeder« etwas genauer 
anzusehen. 





Kurze Ladezeiten 


Das Happy Drive Enhancement, 
das den Platz des ROM und den des 
Prozessors in der Diskettenstation eın- 
nimmt, versetzt seinen Besitzer in die 
Lage, den Controller direkt zu pro- 
grammieren und damit die Disketten- 
station vielseitiger zu handhaben, als 
es normalerweise möglich ist. 

Auf der aufzusteckenden Platine 
sind neben ein paar Logikbausteinen 
ein 8-KByte-EPROM, ein 8-KByte- 
RAM sowie eine 6502 CPU unterge- 
bracht - ein vollständiger kleiner Com- 
puter also. In dem RAM werden nicht 
nur die Übergabeparameter des Com- 
puters gespeichert, sondern es dient 
auch dazu, immer einen Track voll- 
ständig einzulesen. Dadurch wird eine 
geringere Belastung der Mechanik 
und vor allem eine erhebliche 
Geschwindigkeitssteigerung erreicht, 
da nachfolgende Sektoren schon zur 
Verfügung stehen und nicht mehr 
extra gelesen werden müssen. 

Ein vom Anwender benutztes nor- 
males DOS merkt nichts von diesen 
Vorgängen, da sie alle von dem Happy 
Drive Enhancement gesteuert wer- 
den. Weiterhin ist es möglich, eigene 
Programme im Happy Drive Enhance- 
ment laufen zu lassen und so die Dis- 
kettenstation fest im Griff zu haben. 
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Eine kleine Platine im Laufwerk macht’s möglich 


Der Benutzer kann seine Disketten 
mit dem Enhancement für die Atari 
1050 auf Double-Density formatieren, 
was ihm dann 176 KByte auf jeder Dis- 
kettenseite zur Verfügung stellt. Den 
Besitzern eines alten Laufwerks, der 
Atari 810, steht die doppelte Schreib- 
dichte nicht zur Verfügung, da der dort 
eingebaute Controller dieses Format 
nicht erzeugen und verwalten kann. 
Wegen der unterschiedlichen 
Controller-Typen (bei der Atari 810 ist 
es der- 1771, bei der Atari 1050 der 
2793, beide von Western Digital) gibt 
es zwei verschiedene Happy Drive 
Enhancements, die Software ist 
jedoch identisch. 

Ein weiterer Vorteil des Speeders: 
Der Benutzer ist nicht mehr auf die 
Übertragungsrate von 19200 Baud 
(übertragene Bits pro Sekunde) zwi- 
schen Computer und Diskettenstation 
angewiesen, sondern kann mit be- 
stimmten -Software-Einstellungen bis 
zu 70000 Baud erreichen. Damit wird 
aus dem monotonen Piep-Piep beim 
Laden und Speichern ein hohes 
Pfeifen. 

Verzichtet man hierauf, kann man 
selbst in der normalen Betriebsart die 
Geschwindigkeit steigern, indem man 
ein DOS erzeugt, bei dem Verify-Write 
ausgeschaltet ist (mit POKE 1913,80). 
Das Happy Drive Enhancement führt 
diese Kontrolle schon selbständig 
durch. 

Zusätzlich zu der Platine werden 
das »Happy Warp Speed Menü« und 
das »Warp Speed Dos« mitgeliefert, 





das mit dem Atari Dos 2.0 zusammen- 
arbeitet. 

Das Warp-Speed-Menü erscheint 
mittlerweile in der Version 7.1, die dem 
Benutzer neun Menüpunkte zur Verfü- 
gung stellt: 

Drive Options: 

Hier kann der Anwender 

- sein Laufwerk wieder zu einem 
gewöhnlichen Atari-Diskettenlaufwerk 
ohne Beschleuniger machen, damit 
manche heiklen Original-Programme 
laufen. Sämtliche Funktionen des 
Happy Drive Enhancement sind dann 
abgeschaltet. Nur nach einem Äus- 
und wieder Anschalten wird das Ätari- 
Laufwerk wieder »fröhlich«. 

- das Happy Drive Enhancement 
initialisieren, um vorher eingestelle 
Optionen wieder aufzuheben. 

- den »Drive-Select« außer Kraft 
setzen und Laufwerk 1 beispielsweise 
zu Laufwerk 2 machen. 

- die Zeit bestimmen, in der das Lauf- 
werk nach dem letzten Zugriff noch 
laufen soll, um bei einem eventuell 
erneuten Zugriff die Anlaufzeit des 
Motors zu sparen. 

- auf schnelles Schreiben schalten. 
- den U,S. Emulator installieren. 
Kopierprogramme beispielsweise, die 
diesen ansprechen, schreiben und 
lesen dann um ein Vielfaches schnel- 
ler als ohne den Emulator. 

- Laufwerk auf Write-Enable stellen. 
- Laufwerk auf Write-Protect stellen. 
Diagnostic: 

Hier wird das »Happy Enhancement 
Diagnostic«-Programm nachgeladen. 








Es folgt eine Auswahl von Test- 
Funktionen: RAM und ROM der Erwei- 
terungen werden genauso überprüft 
wie Übertragungsrate, Anzahl der 
Umdrehungen pro Minute, Kopfposi- 
tionierung, Schreib- und Lesesicher- 
heit und die zusätzliche Hardware- 
Option. 

Sector Copier: 

. Ein Diskkopierer wird nachgeladen, 
mit dem Atari-Disketten auf sehr kom- 
fortable Art und Weise dupliziert wer- 
den können. So erlaubt es die Erweite- 
rung hier, Start- und Endsektor des zu 
'kopierenden Diskettenbereichs einzu- 
geben. 

Happy Backup: 

Der Diskettenkopierer ist das Herz- 
stück dieses Menüs. Dieses nachzu- 
ladende Programm kann allein oder 
mit Hilfe sogenannter »PDP-Files« fast 
alle kopiergeschützten Single- 
Density-Disketten duplizieren. PDP- 
kopierte Disketten laufen dann nur mit 
eingebauter Happy-Erweiterung. 
Happy Compacter: 

Nach dem Nachladen stößt der 
Anwender wieder in ein Menü, in dem 
es ihm möglich ist, mehrere Boot- 
Disketten auf einer zu sammeln. 
Tracks, die ein Programm nicht nutzt, 
werden für ein anderes freigehalten. 


Multi Drive: 

Bei diesem Kopierprogramm wer- 
den zwei Happy-Enhancement- 
Laufwerke benötigt. Dadurch entfällt 
das nervende dreimalige Auswech- 
seln von Quell- und Zieldisketten. 
Enable Tracer: 

Der Tracer wird hier aktiviert. Jeden 
weiteren Track, der beim Diskettenzu- 
griff angesprochen wird, merkt sich 
das Happy Drive Enhancement, und 
dieser kann nach erneutem Laden des 
»Happy Warp Speed Menü« abgefragt 
werden. Die Diskettenstation darf zwi- 
schendurch nicht ausgeschaltet wer- 
den, da sonst kein Tracen möglich 
ware. 

Display Trace: 

Nur möglich, wenn vorher die Funk- 
tion »Enable Tracer« angewählt wurde. 
Es werden die Tracks 0 bis 39 ange- 
zeigt, die beim Booten benutzt wur- 
den. Da beim Booten immer der Sek- 
tor 1 (Track 0) gelesen wird, und das 
Happy Warp Speed Menü nur Track O 
benutzt, ist das Aufzählen der gelese- 
nen Tracks dem der vorherigen Boot- 
Diskette gleich. Deshalb ist das Happy 
Warp Speed Menü als Boot-Pro- 
gramm realisiert, als File könnte es 
auch noch andere Tracks belegen und 
so das Ergebnis verfälschen. 


u a = SE 


Insgesamt hinterläßt diese erste 
und vielseitigste Erweiterung einen 
hervorragenden Eindruck. Denn 
obwohl es andere und kostengünsti- 
gere Zusätze ähnlicher Art gibt, ist 
Happy Drive Enhancement das aus- 
gereifteste Produkt. Außerdem unter- 
stützen einige amerikanische und 
deutsche Softwarehersteller diesen 
Speeder mit ihren Programmen. 

Mit diesen Programmen ist es mög- 
lich, sich ein völlig eigenes Format mit 
eigenem Kopierschutz zu erstellen. 
Mit der Atari 1050 kann man dann zum 
Beispiel ein Format in Medium- 
Density erzeugen, das jede 1050 ohne 
Probleme liest. Aber noch nicht ein- 
mal das Happy Drive könnte diese Dis- 
kette kopieren. 

Das Happy-Drive-Enhancement ist 
für 149,95 Dollar plus 10 Dollar Ver- 
sandkosten bei der Firma Happy- 
Computers, PO. Box 1268, Morgan 
Hill, CA 95037 erhältlich. 

Wer sich vor einer Bestellung in den 
USA scheut, kann sich an einen Ätari- 
Händler wenden, muß dann aber 
mehr Geld ausgeben. Wie Sie eine 
Bestellung direkt in die USA richten, 
haben wir ausführlich in der Happy- 
Computer Ausgabe 7/87 beschrieben. 

(Kjersten Waldheim/jg) 





ST PAINT für die ATARI ST 


Das ideale Mal- und Zeichenprogramm 
für Ihren ATARI ST. 


Hardware-Anforderung: 

Atari ST mit mindestens 512 Kbyte RAM, Menochrom-Monitor 
Atari SM 124, einseitiges oder zweiseitiges Diskettenloufwerk, 
Matrixdrucker. 


Bestell-Nr. 51633 


Für nur DM 99, 


* inkl, MwSt. Unverbindliche Preisempfehlung 


ST PAINT ist ein pixelörientiertes Grofik-P 


Leistungsmerkmale: 


@ komfortable GEM-Benutzeroberlläche mit Pulldown-MNienüs, 


Diologboxen, GEM-Fenster und Funktionstastenleiste 


® Ioden und Speichem im Doodle-, Neochrom- und Degas-Format, 


eigenes format für »BlGe- und »FAle-Bilder 
® einfache Einbindu 


(GEM-Ponts 


® editierbare Druckertreiber zur Ansteuerung vieler Matrixdrucker 
© Se Treiber für Epson-FX 80 und Kompatible sowie NEC P& auf 


r Programmdiskette und vieles mehr. 


Dieses Morkt&Technik-Softwareprodukt erhalten Sie in 
den Fochobteilungen der Warenhäuser, im Wersandhon- 
del, in Computer-Fachgeschäften oder im Buchhandel. 
Yvenn Sie direkt beim Verlag bestellen wollen: gegen 
Vorauskasse durch Verrechnungsscheck oder mit der 
obgedruckten Zahlkorte, 


Markt& Technik Verlag AG, Buchverlag, Hans-Pinsel-Stroße 2, 8013 Haar bei München, Telefon [089) 4613-0 


ramm für den ambitio- 
nierten Computerzeichner, Die Vielfalt der Zeichenfunkfionen und 
die bequeme Bedienung mit Maus und Tastatur über die sinnvoll 
aufgebaute GEM-Benutzeroberfläche erlauben auch dem ungeüb- 
ten Zeichner, professionelle Gebrauchs-Grafiken auf dem Atari ST 
und einem leistungsfähigen Motrixdrucker zu produzieren. 


von Texten in verschiedenen Größen und 
Textattributen, gleichzeitige Dorstellung mehrerer ladbarer 








Markt&zfechnik 


Zeitschriften - Büch er 
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Software - Schulun 
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Bestellungen im Ausland bitte an: SCHWEIZ: Markt&Technik Vertriebs AG, Kollerstrasse 3, CH-6300 Zug, Telefon (042) 41 5456 - ÖSTERREICH: Rudolf lechner & Sch 
Heizwerkstraße 10, A-1232 Wien, Telefon (0222) 677526 - Jeberreuter Medio Verlogsges. mbH (Großhandel), N a 24, A-109] Wien, Telefon (02 22) 48 15 38.0. 
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Das GROSSE HEIMCOMPUTER MAGAZIN 
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Spiele-Tips | 








chtung Spiele-Fans: Hier kommen insgesamt mehr als dreihundert 
Seiten voll mit Spiele-Tests, Marktübersichten, Grafik- und Musikpro- 
grammen. Zusammen ergeben Sie ein Super-Nachschlagewerk. Geschicklich- 
keits-Spiele, Action-Spiele, Strategiespiele, Sport-Spiele .. 

vom C64 bis zum PC. 





Nutzen Sie die Bestellmög- 
lichkeit der Happy-Compu- 
ter-Sonderhefte mit der 
eingehefteten Zahlkarte 
ncch der Seite 98 in dieser 


Ausgabe. 








Mit ein bißchen Computer- 
kenntnis, ein paar Assembler- 
Zeilen und einer guten Idee las- 
sen sich aus den XWXE- 
Computern viele Farben gleich- 
zeitig herauskitzeln. 


ine der Stärken des Atari XL- 

Computers ist seine Farbenviel- 

falt. Er kann 16 Farben in 8 ver- 
schiedenen Helligkeiten darstellen, 
was zusammen 128 verschiedene Far- 
ben ergibt. Angesichts dieser Farben- 
vielfalt ist man begeistert, doch nach 
kurzer Zeit kommt die Ernüchterung: 
128 Farbschattierungen stehen zwar 
zur Auswahl, in den einzelnen Grafik- 
stufen sind aber nur maximal 4, in den 
Textstufen maximal 5 Farben gleich- 
zeitig darstellbar. Es gibt zwar die 
Möglichkeit, über einen Display-List- 
Interrupt in jeder Bildschirmzeile die 
Farben umzuschalten. In vertikaler 
Richtung sind so beliebig viele Farben 
darstellbar, trotzdem hat man in einer 
horizontalen Zeile immer noch nur 
4 beziehungsweise 5 Farben zur Ver- 
fügung. 

Beim Atari gibt es außerdem 3 wei- 
tere Grafikstufen, in denen ein Bild- 
punkt eine Zeile hoch und vier Punkte 
breit ist. In der Grafikstufe 9 sind 16 
Graustufen einer Farbe darstellbar 
und in Grafikstufe 11 sind es 16 Farben 
einer Helligkeit. Bei Grafikstufe 10 sind 
7 Farben frei definierbar. 

Um 256 Farben gleichzeitig aufdem 
Bildschirm darstellen zu können, ist 
folgende Überlegung notwendig: Das 
Fernseh- oder Monitorbild wird 50mal 
in der Sekunde neu gezeichnet. Wenn 
jetzt zwischen einem Bild mit Grau- 
werten und einem Bild mit Farbwerten 
im Takt des Bildschirmaufbaus hin- 
und hergeschaltet wird, kann das 
Auge des Betrachters die Bilder nicht 
mehr auseinanderhalten und mischt 
die Grau- und die Farbwerte zu einer 
Farbe zusammen. Auf diese Weise 

lassen sich aus 16 Grauwerten und 16 
Farbwerten 256 Farben zurechtmi- 
schen. 

Das Verfahren hat jedoch einige 
Nachteile, die hier nicht verschwiegen 
werden sollen. Zum ersten tritt durch 
das rasche Hin- und Herschalten zwi- 
schen den beiden Bildern ein unange- 
nehmer Nebeneffekt auf: Das Bild 
flackert sehr stark. Dieser Effekt trat 
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auch bei einigen alten Adventurespie- 
len von Scott Adams auf. Nach den 
ersten drei Spielen sah er jedoch ein, 
daß diese Art der Bilderzeugung viel 
zu anstrengend für den Betrachter ist. 
Ab dem vierten Spiel verwendete er 
dann wieder die normale Art der Bil- 
derzeugung. Ohne Bedeutung ist das 
Flackern jedoch, wenn man Bilder 
zeichnet und diese dann vom Bild- 
schirm abfotografiert (siehe Bilder in 
diesem Beitrag und in der Inhaltsan- 
gabe dieser Ausgabe). Zum zweiten 
lassen sich bei diesem Verfahren, 
bedingt durch die Auflösung der bei- 
den verwendeten Grafikstufen, hori- 
zontal nur 80 Punkte darstellen. Und 
zum dritten muß man einen nicht uner- 
heblichen programmtechnischen Auf- 
wand betreiben, um das Bild darzu- 
stellen. Im Computer muß nämlich ein 
Programm fest installiert sein, das die 








Der XL treibt’s 
ganz schön bunt 





Bilder umschaltet. Zusätzlich nehmen 
diese Programmroutinen sowie die 
beiden Bilder Speicherplatz weg. 

Dem Flackern läßt sich mit einem 
Kniff beikommen: Wie bei einem Fern- 
sehbild verschiebt man jedes zweite 
übertragene Bild gegenüber dem 
ersten um eine Zeile. In jeder geraden 
Zeile werden dann die Grauwerte dar- 
gestellt und in jeder ungeraden Zeile 
die Farbwerte. 

Damit man ein 256-Farben-Bild aus- 
geben kann, braucht man ein Pro- 
gramm, daß die Bilder hin- und her- 
schaltet, sowie zwischen Grau- und 
Farbwerten wechselt. Zusätzlich 
braucht man zwei Display Lists, die 
das Farbbild gegenüber dem Hellig- 
keitsbild um eine Zeile verschieben. 
Das Listing »COL256.BIN« stellt die- 
ses Programm dar Das Programm 
steht im Speicher ab Adresse 1536 
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($600) und belegt 104 Byte. Es ist so 
geschrieben, daß es unter Turbo- 
Basic mit dem Befehl »BLOAD 
"D:COL256.BIN ” « geladen wird. Das 
Programm »FARB256« enthält alle 
Programmschritte, die nötig sind, um 
einen 256-Farben-Bildschirm zu 
erzeugen. Am besten speichern Sie 
das Programm mit »LIST ”D:FARB 
256.TXT ”« auf Ihre Diskette, damit Sie 
es mit dem Befehl »ENTER« ın eigene 
Programme einbinden können. Das 
Programm springt man unter Turbo- 
Basic einfach mit »EXEC FARB256__ 
INIT« an, worauf die Display-Lists 
installiert und das COL256.BIN- 
Programm geladen werden. 

Dann schaltet man die Grafik mit fol- 
gendem Befehl an: 
D-USR ($0600,GTIAMode) 

Für die Variable »D« läßt sich jede 
andere im Programm nicht benützte 
Variable einsetzen. Sie wird von der 
Funktion zwar nicht verwendet, muB 
aber trotzdem angegeben werden, da 
der »USR«-Befehl eine Variable erwar- 
tet. Solange keine Player-Missile- 
Grafik verwendet wird, setzt man für 
GTIAMode normalerweise eine 64ein, 
was Grafikmode 9 entspricht. Anson- 
sten schauen Sie bitte im Beitrag über 
die Hardwareregister der Atari 8-Bit- 
Computer unter dem Register 


NEI- 





Nach einem Reset des Rechners bleiben 
der RAM-Disk vollständig erhalten. 
Die wesentlich kürzeren Zugriffszeiten e 


lichen Ihnen ein effizienteres Arbeiten mit ei 
ATARI ST. Die RAM-Disk belegt einen freien Teil des 
Arbeitsspeichers. Das Fehlen einer laufwerkmechanik 
steigert die Verarbeitungsgeschwindigkeit erheblich, Die 
Verwendung des Druckerspoolers ermöglicht Ihnen, 
während des Ausdrucks mit Ihrem Programm weiter- 


arbeiten zu können. 


NET-RAM-Disk ist lauffähig mit allen Programmen, die 


den Bildschirmspeicher nicht verändern. 


Moarkt&Technik-Produkte erhalten Sie in den Fochobteilungen 
der Warenhäuser, im Versandhandel, in Computer-Fachgeschäften 


oder bei Ihrem Buchhändler. 
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Mit »Paint256« erzeugtes, digitalisiertes Bild 


»PRIOR« nach, welche Werte Sie ein- 
setzen müssen. Nachdem die Grafik 
nun aktiviert ist, muß der Bildschirm- 
speicher gegen unbeabsichtigtes 
Überschreiben durch ein Basic- 
Programm geschützt werden. Dazu 
verwendet man folgende Befehls- 
folge: 

POKE 106,120 
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__Zeitsch riften - Bücher 
" Software - Schulung 


=Disk für ATAR 


Die residente RAM-Disk zur Optimierung 
der Zugriffszeit unter GEM-Desktop fi 


Die NET-RAM-Disk ist eine Utility zur Optimierung der 
Speichermedien auf dem ATARI ST. Durch die Benutzung 
dieses Programms wird Ihr System um eine Diskettensta- 
tion erweitert. Sie besitzt alle Funkfionen einer normalen 
Floppystation, befindet sich im Hauptspeicher des 
Rechners und ist voll im GEM-Desktop eingebunden. 
je Daten auf 


Willman jetzt Grafiken zeichnen, so 
muß die gleiche Grafik in beiden Bil- 
dern gezeichnet werden, einmal mit 
dem Helligkeitsbild und das zweite 
Mal mit dem Farbbild. Dazu legt man 
erst einmal die Farbe und die Hellig- 
keit fest. So ergibt: 

COL = 3 
LUM = 6 





ST 


ir den ATARI ST. 





> Hardware-Anforderungen: 
- e Computer der ST-Familie 
I ® mindestens ein Floppylaufwerk 


|| Bestell-Nr. 51448 (31%-Diskette) 
IK: Für nur DMA9— ..35,-155 332,20- 


*inkl. MwSt. Unverbindliche Freisempfehlung 








NETRAM-Disk| ATARLST Er 
* inkl. ht. Unverbindliche Preisempfehlung 
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ein dunkles Rot. Dann teilt man dem 
Computer über die Speicherstelle 88 
mit, wo sein Bildschirmspeicher steht. 
Alle Grafikbefehle beziehen sich jetzt 
auf diesen Bildschirmspeicher. Als 
erstes zeichnet man das Helligkeits- 
bild. 

DPOKE 83, AH 

POKE 87,9 

Anschließend setzt man den Hellig- 
keitswert und führt den Grafikbefehl 
aus. 

COLOR LUM 
PLOT 0,0:DRAWTO 79,191 

Dann setzt man den Punkt. Die glei- 
che Prozedur wiederholt man mit dem 
Farbwert. 

DPOKE 88,AF 
COLOR COL 
PLOT 0,0:DRAWTO 79,191 

Auf diese Weise lassen sich in jedes 
Programm Grafiken mit 256. Farben 
einbauen. Da unter Basic mit instal- 
lierter Grafik nur noch rund 16 KByte 
Speicher zur Verfügung stehen, sollte 
man Programme unbedingt compilie- 
ren. Dadurch gewinnt man zusätzliche 
4 KByte Speicher. Bevor man in ir- 
gendeiner Weise den seriellen Port 
benutzt, sollte man die Grafik wieder 
abschalten. Dies geschieht mit dem 
Befehl: 

D=-USR($0600,0) 

Ansonsten hat der Computer nicht 
mehr genügend Rechenzeit zur Verfü- 
gung und hängt sich auf. Als Beispiel 
haben wir auf Seite 35 ein Programm 
abgedruckt, das alle 256 Farben 
gleichzeitig auf den Bildschirm bringt. 
Davon läßt sich auch sehr schön der 
Aufbau eines 256-Farben-Programms 
zeigen. 


Nach der Arbeit 
kommt das 
| Vergnügen 


Zusätzlich zu den Routinen, die die 
256 Farben ermöglichen, haben wir 
zwei Anwenderprogramme abge- 
druckt, die diese Routinen benutzen. 
Zum einen haben wir ein Malpro- 
gramm beigefügt. Es ist in Turbo-Basic 
geschrieben und benötigt die beiden 
Programme COL256.BIN sowie 
»DLST.256«. Diese Programme müs- 
sen sich zusammen mit »PAINT256« 
auf der gleichen Diskette befinden. 

PAINT2586 stellt verschiedene Funk- 
tionen zur Verfügung. Diese präsen- 
tieren sich nach dem Starten des Pro- 
gramms in der obersten Bildschirm- 
zeile. Darunter folgen zwei schmale 
Zeilen mit 16 Farb- und 16 Helligkeits- 
werten, und unter diesen befindet sich 
die Zeichenfläche, auf der horizontal 





80 und vertikal 192 Punkte darstellbar 
sind. Mit dem Pfeil, den man miteinem 
Joystick in Port 1 ‘des Computers 
bewegt, werden dann die einzelnen 


Funktionen ausgewählt. Um eine 
Farbe festzulegen, fährt man mit dem 
Pfeil auf den entsprechenden Farb- 
oder Helligkeitsbalken und drückt den 
Feuerknopf. Zusätzlich läßt sich die 
Farbe mit den Pfeiltasten auf der 
Tastatur bestimmen. Die Aufwärts-/ 
Abwärts-Pfeile verändern die Farbe 
und die Links-/Rechts-Pfeile bestim- 
men die Helligkeit einer Farbe. Die 
Nummer der ausgewählten Farbe wird 
in der zweiten Menüzeile über der Zei- 
chenfläche bei»Color No.:« angezeigt. 





Kunterbuntes Mandelbrot mit »Apfel256« 


Mit dem Pfeil wählt man auch die 
einzelnen Zeichenfunktionen aus. 
Eine gewählte Funktion wird dann voll- 
ständig invers dargestellt. Folgende 
Funktionen stehen zur Verfügung, 
wobei sich fast alle Funktionen mit 
<ESC> abbrechen lassen, wenn sie 
einmal versehentlich angewählt wur- 
den. 

Pit (Plot): Wenn der Knopf gedrückt 
ist, setzt das Programm an der ent- 
sprechenden Stelle auf dem Bild- 
schirm einen Punkt. 

Lne (Line) zieht eine Linie von dem 
Punkt, an dem das erstemal der Knopf 
betätigt wurde, zu dem Punkt des 
zweiten Knopfdrucks. 

Box (Box): Der erste Knopfdruck 
legt den Eckpunkt eines Kastens fest. 
Wird dann der Pfeil bewegt, so wird 
von dem Eckpunkt zu der neuen Pfeil- 
position ein Kasten gezogen. Beim 
zweiten Knopfdruck wird der Kasten 
gezeichnet. 

Zrc (Circle): Beim ersten Knopf- 
druck wird der Mittelpunkt eines Krei- 
ses bestimmt. Beim zweiten wird ein 








Kreis mit dem Radius vom Abstand 
des Mittelpunkts zur Position des 
Pfeils gezeichnet. 

Txt (Text): Nach dem der Knopf betä- 
tigt wurde, läßt sich ein Text mit maxi- 
mal 10 Zeichen Länge eingeben. Mit 
<BACKSPACE> wird eine fehler- 
hafte Eingabe korrigiet. <ESC> 
löscht den gesamten Text. Mit 
<RETURN> wird der Text übernom- 
men und mit dem Joystick positioniert. 
Durch Knopfdruck wird der Text in das 
Bild eingefügt. 

Scl (Scale): Mit dieser Funktion wird 
der Ausschnitt eines Bildes vergrößert 
oder verkleinert. Dabei dürfen sich die 
Bereiche auch überlappen. Da der 


Computer sehr viel Rechenzeit ver- 
braucht, wenn er einen Bildschir- 
mausschnitt transformiert, wird zwi- 
schendurch der Bildschirm ausge- 
schaltet. Durch diesen Trick hat der 
Computer mehr Zeit zur Verfügung. 

Fil (Fill): Eine schwarze Fläche wird 
mit der gewählten Farbe ausgefüllt. 

Cut (Cut): Diese Funktion schneidet 
einen rechteckigen Ausschnitt aus 
und fügt ihn an anderer Stelle wieder 
ein. 

Ray (Rays): Ausgehend von einem 
gemeinsamen Punkt werden Linien 
gezogen. Indem man im Menü eine 
andere Funktion auswählt, beendet 
man diese Funktion. 

Cin (continue Lines): Es werden 
fortlaufende Linien gezogen. Der End- 
punkt einer Linie ist gleichzeitig der 
Startpunkt der nächsten Linie. Auch 
diese Funktion wird erst durch eine 
andere Funktion beendet. 

Ers (Erase): Der Pfeil verwandelt 
sich in ein schraffiertes Zeichen, das 
eine Art Radiergummi darstellt. Es 
löscht Flächen aus einem Bild. 
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Superbase vereint als erstes Pro- 
gramm einer neuen Generation von 
Datenbank-Systemen sowohl eine 
neuartige, äußerst benutzerfreund- 
liche Bedienung mit Pull-down- 
Menüs, Fenstern und Maussteuerung 
als auch die enorme Leistungs- 
fahigkeit einer relationalen Datei- 
verwaltung. | 


Einfacher Datenbank-Aufbau 


Mit den leichtverständlichen Pull-down- 
Menüs und Kontrollfeldern legen Sie in Minu- 
ten eine komplette Datenbank an. Sie können 
eine bereits festgelegte Struktur jederzeit 
ändern, ohne Ihre Daten zu zerstören. 


Verwaltung der Daten 


Superbase zeigt Ihre Daten auf verschiedene 
Arten an, beispielsweise als Tabelle oder als 
Formular. Sind Index und Felder selektiert, 
können Sie Ihre Daten wie bei einem Video- 
recorder anzeigen lassen. Schneller Vorlauf, 
Rücklauf, Pause und Stop - ein Recorder ist 
nicht einfacher zu bedienen. Ein einzigartiges 
Filtersystem wählt beliebige Datenkategorien 
aus, mit denen Sie dann arbeiten können. 


Die Stärken von Superbase 


Das Festlegen von Übersichten und zusam- 
menhängende Abfragen über mehrere ver- 
knüpfte Dateien sind auch bei verschiedenen 
Sortierkriterien kein Problem. Daten anderer 
Datenbanken oder Anwenderprogramme im 
ASCII-Format lassen sich ebenfalls problem- 
los verarbeiten. Binden Sie Daten in Ihre Text- 


se gib! 


a 
nd Kompatible 


Markt&Technik Verlag AG, Buchverlag, Hans-Pinsel-Straße 2, 8013 Haar bei München, Telefon 089) 4613-0 


Superbase - da relationale Datenbank-System 
für den Atari ST 


verarbeitung ein, oder bilden Sie aus verschie- 
denen Dateien eine neve Datenbank! 


Datenbank mit Bildern 


Superbase bietet neben den gängigen 
Datenbank-Funktionen die Möglichkeit, Bilder 
und Grafiken darzustellen und zu verwalten. 
Einzigartigen Grafik-Datenbanken oder Dia- 
Shows steht also nichts im Wege. 


Wer braucht Superbase? 


Die Anwendungsmöglichkeiten sind nahezu 


unbegrenzt. 
Professionelle | 
Anwendungen | 


Design 
Fotografie 
Journalismus 
Sammlungen 
Forschung 


Ausbildung 


Hier einige Beispiele: 


Geschäftliches h 


logerbestand 
eg 
Registratur 
Versandlisten 
Verwaltung 
Adressen 
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Leistungsumfang 


Die Software: ® bis zu 16 Millionen 
Datensätze pro Datei ® maximal 999 Indizes 
pro Datei ® Speicherkapazität pro Datei, 
Anzahl der geöffneten Dateien, Anzahl der 
Dateien und Anzahl der Felder pro Datensatz: 
abhängig von der Disketten- bzw. Festplatten- 
kapazität. 

Die Daten: ® Text, Daten, numerische 
Felder und externe Dateien ® Überprüfun 
bei der Eingabe & Formelfelder ®@ Kalender 
der Jahre 1-P999, verschiedene Datums- 
formen ® verschiedene Zahlenformate bei 
13stelliger Genauigkeit ® Datenschutz per 
Pabwort 

Die Ausgaben: © das Programm 
beherrscht einen flexiblen Etikettendruck und 
produziert übersichtliche Listen mit dem 
Reportgenerator @ bis zu 255 Spalten 

© mit Titel, Datum und el ® Daten- 
satz-Z/ähler, Durchschnitt, Zwischen- und End- 
ergebnis ® Ausgabe von mehreren Dateien 
auf Bildschirm, Drucker, Diskette oder neuer 
Datei ®@ mehrspaltiger Etikettendruck mit 
variablem Format @ Speicherung der Aus- 
gabe- und Abfrage-Formate zur späteren Ver- 
wendung ® vieltältige Sortierkriterien 


Hardware-Anforderung 


® Atari ST 512 Kbyte ®@ 31%"-Disketten- 
laufwerk ® 80-Zeichen-Monitor 
Lieferumfang: © 315” Diskette ® Hand- 
buch deutsch 


Best.-Nr. 51 641 


DM 249, (sFr 199, -1öS 2490,-*) 


* inkl. MwSt. Unverbindliche Preisempfehlung 


705218 


Bestellungen im Ausland bitte an: SCHWEIZ: Markt&Technik Vertriebs AG, Kollerstrasse 3, CH-6300 Zug, Telefon [042} 415656 - ÖSTERREICH: Rudolf lechner & Sohn, 
Heizwerkstraße 10, A-1232 Wien, Telefon (0222) 677526 - Veberreuter Media Werlagsges. mbH [Großhandel], Alser Strabe 24, A-1091 Wien, Telefon (0222) 481538-0. 


Realteil 
-2 -1.25 
-0.225 -1.125 


-0.74591 0.171196 
-0.1765625 -1.0484375 


Dsk (Disk): Es erscheint ein neues 
Menü, über das verschiedene Disket- 
tenfunktionen ausgeführt werden: 

- Save (Save): Das Bild wird auf der 
Diskette gespeichert, wobei ein Bild 
123 Sektoren belegt. 

-Load (Load): Sämtliche Files mit 
dem Zusatz ».PlC« werden in der 
obersten Zeile angezeigt. Ein Knopf- 
druck lädt das Bild. Indem man den 
Joystick bewegt, wird das nächste 
File angezeigt. 

- Frmt (Format): Formatiert die Dis- 
kette in Laufwerk 1. Dazu muß die 
Taste <Y> gedrückt werden. Alle 


anderen Tasten brechen die Funk-. 


tion sofort ab. 

- Dir (Directory): Zeigt sämtliche Files 
mit dem Zusatz ».PlC« an. Durch 
Joystickbewegung wird das nächste 
File aufgeführt, Knopfdruck beendet 
die Funktion. 

-EDir (extended Directory): Dies 
funktioniert wie die Directory- 
Funktion. Im Gegensatz dazu wer- 
den jedoch alle Files ausgegeben. 

- Bye (Bye): Das Programm kehrt wie- 
der ins Hauptmenü zurück. 

- Quit (Quit); Das Programm wird 
beendet, und man befindet sich wie- 
der im Turbo-Basic. 

New (New): Nach Drücken der Taste 
<Y> wird das Bild gelöscht. 


Meandelbrot 


Das zweite Programm berechnet 
die gute alte Mandelbrotmenge, bei 
dieser Version allerdings in 256 Far- 
ben. Das Prinzip der Mandelbrotbe- 
rechnung soll hier nicht weiter erläu- 
tert werden. Gerade in der letzten Zeit 
haben sich wissenschaftliche Maga- 
zine und Computerzeitschriften mit 
Beiträgen über die Mandelbrotmenge 
geradezu überschlagen, so daß die 
Berechnung der Bilder bekannt sein 
sollte. Wer trotzdem wissen möchte, 
wie Mandelbrot funktioniert, und sich 
allgemein für Fractals interessiert, 
sollte sich das Buch »The Beauty of 
Fractals« von H.-O. Pleitgen und P.H. 
Richter anschauen. Es ist zwar in eng- 
lischer Sprache verfaßt, bietet aber 





Ausschnitt 


Gesamtansicht 
Zweig 

Spirale 

kleines Mandelbrot 





soviel Stoff zu diesem Thema, daß es 
fast als »Bibel« der Mandelbrotmenge 
und deren Nebenarten bezeichnet 
werden kann. Nebenbei enthält es 
viele phantastische Bilder. Das Buch 
ist im Springer-Verlag Heidelberg 
erschienen und kostet 78 Mark. 

Zurück zum Mandelbrotprogramm. 
Gerade bei Bildern aus der Mandel- 
brotmenge sind viele Farben wichtig, 
da die Bilder sonsteinen Großteil ihres 
Reizes verlieren. Auch dieses Pro- 
gramm ist in Turbo-Basic geschrieben 
und sollte mit dem Prüfsummer einge- 
geben werden. Nach dem Starten 
meldet sich das Programm mit folgen- 
dem Menü: 

Laden Bild: Das Programm ver- 
langt eine dreistellige Nummer des zu 
ladenden Bildes. Anschließend wird 
das Bild mit dem Dateinamen 
»APFELXXX.PIC« geladen. 

Speicher Bild: Wie bei »Laden 
Bild«, nur daß bei dieser das Bild vom 
Speicher auf Diskette übertragen 
wird. 

Berechne Bild: Nach Eingabe der 
Werte für die untere linke Ecke, der 
Seitenlänge und der Berechnungs- 
tiefe beginnt das Programm einen 
Ausschnitt aus der Mandelbrotmenge 
zu berechnen. Dieser Ausschnitt ist 


wie bei den Originalprogrammen auf 


Großcomputern quadratisch. Die 
Berechnungstiefe sollte größer oder 
gleich 256 sein, da sonstnicht alle dar- 
stellbaren Farben ausgenutzt werden. 

Ausschnitt vom Bild: Diese Funk- 
tion läßt sich nur aufrufen, wenn sich 
ein Bild im Speicher des Computers 
befindet. Das Programm schaltet auf 
das Bild um, und es erscheinen zwei 
Rahmen auf dem Bildschirm, die die 
rechte obere sowie die linke untere 
Ecke eines neu zu berechnenden Bild- 
ausschnitts repräsentieren. Der Aus- 
schnitt wird mit dem Joystick über das 
Bild bewegt. Ein Druck auf den Joy- 
stickknopf verändert die Ausschnitts- 
größe. Bei Druck auf die <START>- 
Taste fragt das Programm nach der 
Rechentiefe. Anschließend wird der 
neue Mandelbrotausschnitt berech- 
net. 

Während die Berechnung des Bil- 
des erfolgt, läßt sich der Bildschirm mit 
der <START>-Taste abschalten. 
Dadurch arbeitet der Computer dop- 











pelt bis dreimal so schnell. Mit der 
<SELECT>-Taste wird der Bild- 
schirm wieder angeschaltet. 

Directory: Das Inhaltsverzeichnis 
des Diskettenlaufwerks wird ange- 
zeigt. 

<SELECT>-Taste: Das berech- 
nete Bild erscheint. Falls kein Bild im 
Speicher ist, bleibt der Bildschirm 
schwarz. 

<STIART>-Taste: Es wird wieder 
zum Menü zurückgeschaltet. 

Im unteren Bereich des Bildschirms 
werden die Bildparameter des berech- 
neten beziehungsweise geladenen 
Bildes angezeigt. Ein Bild nimmt auf 
der Diskette zwischen 123 und 124 
Sektoren in Anspruch, je nachdem, 
wie viele Stellen die Bildwerte aufwei- 
sen. Damit Sie, ohne viel in der Man- 
delbrotmenge herumzusuchen, Bil- 
der mit dem Programm »APFEL256« 
berechnen können, haben wir für Sie 
Werte interessanter Ausschnitte zu- 
sammengestellt. 

Vielleicht wissen Sie weitere ıinter- 
essante Anwendungen für den 256- 
Farben-Zusatz. Schreiben Sie uns 
doch Ihre Vorschläge für weitere 
Anwendungen. Wir freuen uns über 
jede Anregung. 

(Stephan Gerle/hf) 










Diskette 
[Eingabenie: | Prütsummer 
Datenträger: 


















:COL755.BIN 
:112 Bytes 


Programmnanme 

















FProgrammname :DLST.256 


Länge 


Gr E2-E- 2 JE Bun: SE; BESB) BEE EEE: BEE 


Baal: 7u 
22088:978 
BBid: BF 
2218: AB 
DZ: EB 
Ba2B:cF 


BB: Al 


B238:F8 
Ba4B:CF 
Ba4a: AZ 
2050: 350 


BeSs:cr | 


BOB: AS 


2063: 7! 


B970:CF 
DO78:AS5 
2989:BO 
BBSB:CcF 
BAD: Ab 
BB78:FB 
BaAB:CF 
BaAB:A7 
B9B2:30 
BBBBS:CF 
BacB: AB 
B3C8:78 
Bada:CcrF 
BoDe:AA 
BOEO: BB 
BBES:CF 
BOrFa: AB 
BaAFS:FO 
BIBSO:CF 
BiBS:AC 
B110:38 
B11S:CF 
B128: AD 
B128:70 
B13B:CF 
Bı3S:ı AF 
2140:B8 
B143:CF 
98158:B0 
B158:F8 
B1SG:CF 
2B158:B1 
23178:30 
2178:CF 
2180: B? 


19 —— 





22 
BF 
12 
[1%] 


42 18 
BF 
CF 18 


28 REM Paint 256 
Francois Faquet-Durand 
58 REM Tel. 
6/2128 (Francois) 


a2 — 


iB28 EXEEC DEELARE:EXEC MENUE_INIT:EXEC A 


N 


22505/7493 (Stephan) 


BANaBNEDNSHNNONNREMaHNHUNONNEr- OB 


m0D 
on 


? 
RELECFECELLT 


:1192 Bytes 


48 


9 


BASSnBoNEE Bu HB LE HB 
$) 


(ce) by Stephan Gerle % 


1048 POKE 787,12:POKE 710,78 
1870 # START 
1871 POP :TRAP #FEHLER 


1872 FOKE 87,%2:DPOKE 88,ME:PLOT %3,%43:P 
OSITION '32,%12? COL#16+LUMs "u" 


288% 
2218 
2828 


DO 
EXEC WAIT_KEY 
CHALT=CH 
IF T>%48 
T=-T%&127:D=%0 
IF T=42 


THEN 
THEN 
THEN 
THEN 
THEN 


THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 





B188:78 
B1F8:CF 
2B1F8:B4 
Bı1Ad: BO 
BiAB:CF 
31B0:B5 
B1BS:Fö 
BiCB:CF 
2B1C8:Bä 
2108:38 
BiDBS:CF 
BiIEB:B? 
BlEB: 78 
BiFB:CF 
BiFE:B? 
2200: BB 
BZB8:CF 
8218: BA 
0218:FD 
B228:CF 
0225:BB 
2239:38 
B238:CF 
2249:BC 
2248: 70 
B250:CF 
2758:18 
er 
2258:18 
2B278:CF 
2278:80 
2288:58 
2?788:C[F 
0270:82 
232978: 70 
B2AB:cF 
BZAS: 83 
2B2E8:D& 
B2B8:CF 
22C29:84 
232C8:18 
82008: CF 
B2D8:835 
DZEB:S5B 
BZEB:ECF 
B2FO: 87 
BZFB: 90 
2308: CF 
B328:88 
2318: DO 
B318:CF 
23328:87 


‚ 3252 


LUM=LUM+ (LUM<15) :D=%1 
LUM=LUM- (LUM>#B) :D=41 
COL=COL+(COL{1F3:D=41 
EOL=-COL-(COL>#B} :D=ei1 
G60# START 


CH=%1 
CH=A2 
CH=%AS 
ECH=4 
CH=5 
CH=& 
CH=7 
CH=8 
CH=?7 
EH=1B 


75 


7B 


20 


SRBONSNnaRHEEN 


zz2il 

2212 
2215 
2220 
2238 
2240 
2250 
zea1 

2252 
22553 
2268 
2278 
2258 
2290 
2302 
2318 
2320 
23540 
2541 
2330 
23552 
2378 
2588 
2370 
2428 
2418 
2420 
2430 
2440 
2458 
24508 


2478 


Listing. »Paint256« 


SAc> 
GB <42> 
<HE> 
<B> 
<7A> 
<78> 
<83> 
-18> 
42 x1&> 
«Di> 
<45> 
“397 > 
ba <58> 
sEL> 
Al £45> 
18 <3B> 
As? 
53? 
<71> 
33? 
A4+ <F2> 
<DB> 
CF <AR> 
<68> 
<25> 
s2C> 
sE#> 
18 <Di> 
<ad> 
<DE> 
<F3> 
“BB> 
<ZA> 
<ED> 
<«1F> 


8328:1B 
B5358:CF 
0338:BA 
2540:50 
2348:CF 
23589:8C 
0358: 98 
B3&0: CF 
0348:8D 
0370:D8 
B378:CF 


2350:BE | 


23588: 18 
9370: CF 
2398:8F 
23A9:58 
B3AS:CF 
B3BRB:91 
23B8: 78 
2B3C8:CF 
283C8:92 
2835D8:DO 
BSDBS:CF 
D3ED:F3 
DIES: 18 
BSFB:CF 
BSFB: 94 
2408:58 
2408:CF 
0419:9& 
2418:?78 
n420: CF 
23428:97 
245308: DO 
3435:CF 
2440: 978 
0448:10 
B4598:CF 
2458:77 
2460:50 
D458B: CF 
8470:9B 
2478: 970 
B480:CF 
2488: 9C 
2470: Da 
B4FB:CF 
D4AB: PD 
DaAng: an 


Listing. 


IF T=69 THEN CH=11 


IF 
Le 
ELSE 


IF Y<-253 


T=58 THEN CH=12 
T=78 THEN CH=15 


CH=X DIV 8+%1 


ELSE 


IF Y<-i4 AND xX<22 
CH=18+X DIV 8+%1 


ELSE 


IF Y<-8 AND Y>-12 
COL=X DIV 5:60# START 


EESE 


IF Y<-2 AND Y>-7 
LUM=X DIV 5:60# START 


ENDIF 
ENDIF 
ENDIF 
ENDIF 
ENDIF 


IF CHALT<>CH 
POS=CHALT#4-%735+ME 
POKE FOS„PEEK (POS}%127 
POKE POS+%1 ,PEEK (POS+#41)&127 
POS=CH#+4-%3+ME 
POKE FOS„FEEK (FODS} 1128 


POKE POS+A1 ,PEEK (POS+%1} !128 


ENDIF 


88 BC 
Fa 
Ei 
BD 
Ba 


»DLST.256« 


BENBRABENUANBRABENEBNDBR 


Er 


IF Y>=%1 AND STRIGS(ZXO)=78 OR CH>11 
EXEC SAFE: XA=X: YA=Y:EXEC HELL:D=%® 
ON CH EXEC PLOT,LNE,BOX,ERC,TXT,SCL 
‚„FIL,CUT,RAY,RAY,RUB,DSK,NEW 


ENDIF 








“BE> 
37? 
<FE> 
<FE> 
<E?> 
<92> 
59> 
<B8> 
425 
78? 
<FE> 
x78> 
<E1> 
<Bi> 
<18> 
B5> 
FA> 
<50> 
<B2> 
IF > 
<B1> 
<3F> 
<13> 
31> 
<AS> 
“95> 


<iF> 


<974> 
“975> 
<BE> 
79> 
<A3> 
<3E> 
<Br> 
<35> 
<är?> 
ar > 
<Al> 
257 
<1B> 
<24> 
73? 
<A?> 
x3C> 
<öD> 
<2&> 
<45> 
<Börf> 
<87> 
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I\ ATARI 






die ATARIST=® 


2. 


Die professionelle deuische Textverarbeitung 


mit vollautomatischer Silbentrennung und integrierter Ta 


Ab sofort erhalten Sie PRÖTEXT in einer 
leistungsstärkeren Version — zum alten 


Preis. Als Besitzer der Version 1.x [1.0-1.3) 


haben Sie die Möglichkeit, kosten- 
günstig ein Update zu erhalten. _ 


PROTEXT ist ein leicht bedienbares, [Maus- 


unterstütztes Textprogramm mit hoher 
leistungsfähigkeit. Eingebaute Hiltefunk- 
tionen ermöglichen auch dem Anfänger, 
die gesamte leistungsfähigkeit dieser 
professionellen Software zu nutzen. Dos 
Programm erlaubt die direkte Eingabe 
und Änderung aller Attribute wie Fett- 
schrift, Unterstreichen, Kursivschrift, 
Breitschrift, Ho& und zieren. Der Text 
ist ohne besondere Ausgabe auf dem 
Bildschirm sofort formatiert sichtbar, so 
wie er auch auf dem Drucker aus- 
gegeben wird. Der Zeichensatz ist frei 
definierbar. Älle Positionen im Text (vom 
verfügbaren Speicherplatz abhängig) 
können mit entsprechenden Funktionen 
sehr schnell aufgesucht werden. 


Die schon bekannten leistungsmerkmale: 


vollautomatische Silbentrennung, der 
Text wird auf dem Bildschirm genauso 
ausgegeben, wie er später ausgedruckt 


706217 


TERSIıION > 4% 
Eu 


a “ re | 


ATARIST. 
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wird (WYSIWYG-Prinzip), komfortable 
Funktionsübersicht, universelle Drucker- 
anpassung, Verketten von Texten, ÄArchiv- 
Funktionen, komfortable, programmier- 
bare Rechenfunktionen, selbstlernende 
Textkorrektur mit Grundwortschatz, 
Textlupe, Zeichensatzanzeige. 
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Software - Schulung 
Markt&Technik Verlag AG, Buchverlag, Hans-Pinsel-Stroße 2, 8013 Haar bei München, Telefon (089) 4613-0 


lenkalkulation. 


Neue features: 

Block markieren jetzt direkt mit Maus 

möglich, Maskenmodus, Zugriff auf im 

Desktop installierte Accessories, Text 

direkt drucken, Ganzseitenübersicht, 

erweiterbare, verbesserte Silbentren- 

nung, optimierte Druckerinstallation, 

geschwindigkeitsgesteigerte Formatier- 

routine und vieles mehr. 

Hardware-Anforderung: 

@® Atari 260 ST, 520 ST, 520 ST+, 
1040 ST, 

® |\onochrommonitor 

® beliebiger Drucker 


Bestell-Nr. 51643 


Für nur DM 148, - 


PROTEXT Update 1.x auf 2.1: 
Bestell-Nr. 51644 

Für nur DM 30,— 

(gegen Einsendung der Originaldiskette 
oder Registrierungskarte) 


* inkl. MwSt. Unverbindliche Preisempfehlung 


Bestellungen im Ausland bitte an: SCHWEIZ: Markt&Technik Vertriebs AG, Kollerstrasse 3, CH-6300 Zug, Telefon (042) 415656 - ÖSTERREICH: Rudolf Lechner & Sohn, 
Heizwerkstraße 10, A-1232 '\Wien, Telefon (0222) 677526 - Vleberreuter Media Verlagsges. mbH [Großhandel], Alser Straße 24, A-10P1 'Wien, Telefon [0222] 481538-0. 





2480 
2490 

2999 
S208 PROC DECLARE 

3818 DIM LEER$ (254) „MAUS$ (11) ,NAMES (16), 
UNDOS$ (7680) 

3931 PMB=128:POKE 54279 ‚PMB: PMB=PMB+2564+ 
1839 

3948 CH=%1:CHALT=CH: XX=%1:COL=%1:LUM=%3: 
UN=ADR (UNDO$) 

32978 POKE 797,255: POKE 53277 ‚22: MAUSS="X 
ETL „ITETL „I@p{SHIFT =3x<.{CTL G3{CTL B 
}Y£CTL „>":MOVE ADR(LEER$) ‚PMB,25& 

3120 AH=$8218: AF=$AB19: ME=AH+$1E0Q 

3148 OPEN #%1,4,%8,"D:DLST.256":BGET #%1 
‚s7389,596:BGET #%1,87C00,596:LCLOSE #%1 

3178 BLOAD "D:COL25%4.BIN" 

3182 FOKE AF,%9: MOVE AF,AF+71,$1E09: MOVE 
AF„AH,s1E82 


FOKE 754,255 
LOOP 


3218 POKE 184,128:GRAPHICS %8:POKE 82,%8 


s2978 ENDPROC 

=308 PROC PARTSAFE 

s3ig IF YAsYı YY=YA#4O:ELSE :YY-Y*+4B:ENDI 
F MOVE UN+YY AH+YY „ABSCYA-YI#49+40 
35P?20 ENDPROC 

>358 PROC MENUE 

3540 DPOKE 88,ME:PLOT #3,43: POSITION %2, 
AB:MOVE ADR(LEER?t) ,„ME,56ß:POKE 87,%0 


3578 ENDPROC 

35880 FROC HELL 

3578 DPOKE 88,AH:POKE 87,9:COLOR LUM 
>52 ENDPRODC 

3618 FROC FARBE 

S3ss208 DFOKE 88,AF:POKE 87,7:COLDR COL 
55350 ENDPROC 

3548 PROC AN 

3650 D=USR ($O400,45):POKE 559,58 

Sösäsgd ENDPROILE 

>6&72 PROC AUS 

S5s808 POKE 559,%8:D=USR (#950 ,AB) PAUSE % 
I 

s578 ENDPROC 

3788 PROC WAIT_KEY 

3718 REPEAT 

5728 EXEC MAUS 

37328 UNTIL PEEK (734)3<255 DR STRIG (ABI =4B 
3740 IF PEEK(754)<255:GET T:ELSE ;T=AB:E 
NDIF 

5758 ENDPROC 

3758 PROC SAFE 

3778 MOVE AH,UN„$1EBE 

5788 ENDPROC 

579720 PROC UNSAFE 

38980 MOVE UN,„AH,„F1EBO 

Ssg1l@ ENDPROC 

5828 PROC MENUE_INIT 

58335989 EXEC MENUE:FPOKE 752,1 
RaysıkKinsErs.Dsk.New." 

38351 POSITION 21,%1:? "Color.No. 2." 
3978 CH=%1:POKE 87,7:DPOKE 88,ME+88 
3880 FOR I=%4B8 TO 15 

3998 COLOR I:TEXT I#5,%79,"." 

3718 NEXT I 

359728 ENDPROC 

4128 PROC FLOT 

4158 WHILE STRIG (#2) =%8 AND Yr—ıi 

4148 EXEC HELL:FPLOT %,Y:EXEC FÄRBE:FLOT 


X,Y:EXEC MAUS 

4198 WEND 

4288 ENDPROC 

4218 PROC FIL 

4228 IF COL>ZB AND LUM>7O 

4238 EXEC HELL:PAINT X,Y:EXEC FARBE:PAIN 
Tx,Y 

4248 ENDIF 

4258. ENDPROC 

4270 PROC LNE 

42598 WHILE STRIGS(Z@) AND Y>-%1 AND PEEK( 
764) <>28 

4298 PLOT XA,YA:DRAWTO X,Y:EXEC PARTSAFE 





:EXEC MAUS 

4318 WEND 

4328 IF Y>-%1 AND PEEK(764)<>28B THEN PLO 
T XA,YA:DRAWTO X,Y:EXEC FARBE:PLOT XA,YA 
:DRAWTO X,Y:PAUSE %3 

4349 ENDPROC 

4350 PROC BOX 

4490 WHILE STRIG(X2) AND Y>-Z1 AND PEEK( 
764) <>28 

4428 PLOT XA,YA:DRAWTO XA,Y:DRAWTO X,Y:D 
RAWTO X,YA:DRAWTO XA,YA 

4438 EXEC PARTSAFE:EXEC MAUS 

4449 WEND 

4458 IF Y>-%1 AND PEEK(764)<>28 

4470 PLOT XA,YA=:DRAWTO XA,Y:DRAWTO X,Y:D 
RAWTO X,YAzDRAWTO XA,YA 

4472 IF D=78 

4488 EXEC FARBE:DRAWTO XA,Y:DRAWTO X,Y:D 
RAWTO X,YAzDRAWTO XA,Ya 

4482 ENDIF 

449@ ENDIF 

4590 ENDPROC 

4518 PROC CRC 

4528 WHILE STRIS(%0) AND Y>%B AND PEEK(7 
64)<>28 

4530 CIRCLE XA,YA,ABS(CXA-X) „ABS(YA-YITEX 
EC UNSAFE:EXEC MAUS 

45598 WEND 

4562 IF Y>-%1 AND PEEK(764)<>28 

4588 CIRCLE XA,YA,ABS(XA-X) „ABStYA-VI SEX 
EC FARBE:CIRCLE XA,YA,ABS(XA-X) „ABS(YA-Y 
) 
4598 
4608 
4612 
4528 


ENDIF 

ENDPROC 

PROC TXT 

L=18:6=%1:POS=%8: NAMES=""ıIF Y<184 
THEN EXEC INPUT 

4638 WHILE STRIS(%@) AND Y>#@ AND Y<194 
AND PEEK (764) < >28 

4648 TEXT X,Y,NAMES:MOVE UN+Y#49,AH+Y#40 
„320: EXEC MAUS 

4660 WEND 

4678 IF Y<%X0 DR PEEK(7644)=28:EXEC UNSAFE 
4650 ELSE :TEXT X,Y,NAME$:EXEC FARBE:TEX 
T X,Y„NAME$S:WHILE STRIG(ZO)=XO:WEND :END 
IF 

46590 ENDPROC 

4708 PROC SCL 

4718 D=X1:EXEC BOX:P1=XA:P2=YA:P3=X:P4=Y 

4712 IF PEEK(7684)<>28 AND X>XA AND YbYa 
4720 EXEC UNSAFE:REPEAT :EXEC MAUS:UNTIL 
STRIG (KB) =: XA=X:YA=Y:EXEC HELL 

4738 PAUSE 1®:EXEC BOX:PS=XA:P&a=YA:P7=X: 


IF PEEK(7EA)IS>ZB AND X>ikA AND Yıya 
EXEC UNSAFE:EXEC SAFE:EXEC AUS 
zZ1=(P1-P3) iPS-P7} : Z2={P2-P4) /(P&-P 


FOR I=48 TO #1 

For I1=P5 TO P7 

FOR IZ=P& TO P8& 

4818 DPOKE 88,UN:LOCATE Pi+tI1-PS)#Z21,P2 
+(12-P6)*72,Z:COLOR Z:DPOKE 88, AH+1*$+200 
) 
4822 
4358 
4360 
4870 
4888 
4882 
4554 
4385 
4EF7u 


DPOKE 88,AH+I##2888: PLOT I1,1I2 
NEXT I2 

NEXT Ii 

MOVE AF,UN,7688 

NEAT I 

EXEC AN 

ELSE :EXEEC UNSAFE:ENDIF 

ELSE :EXEC UNSAFE:ENDIF 
ENDPROC 

47089 PROC DSK 

472B EXEC MENUE:?7 "Save,Load.Frmt„Dir..sE 
Di r.Byes.Dui er 

47358 REPEAT 

4948 EXEC WAIT_KEY:D=%B: T=-T&95 

4958 IF T=%48 


Listing. »Paint256« (Fortsetzung) 








So 


4951 IF Y<-23 THEN D=X DIV 
4960 ELSE 
4978 IF T=83 
4980 IF T=7& 
4998 IF T=78 
sa2Q IF T=68 
S@g1i® IF T=69 
5222 IF T=66 
S@a3@ IF T=81 
S5@a48 ENDIF | 
Sg EXEC MENUE:IF D<& THEN ON D EXEC 5A 
VE,LAD,„FORMAT,NDIR,EDIR:D=& 

5078 EXEC MENUE_INIT 

SQ88 UNTIL D>S 

5278 IF D=7 THEN EXEC AUS:GRÄPHICS %8:PO 
KE 53251 ,7@:END 


18+%1 


D=%1 
D=%2 
D=%3 
D=4 
D=5 
D=& 
D=7 


THEN 
THEN 
THEN 
THEN 
THEN 
THEN 
THEN 


s1i8B ENDPROC 

5118 PROC RUB 

Ss12B MAUSS="{CTL „ItTESC ETL >3UrUHU+tESC 
ETL >3{CTL „I{ETL „I":POKE 87,15 

51358 WHILE Y>AB AND PEEK(784)=255 

51429 WHILE STRIG(CHB)I=%40 AND Y>%1 

s152 EXEC MAUS:COLDR #8 

S158B DPOKE 388,AH: TEXT %#42,Y-41,"." 

5188 DPOKE 88,AF:TEXT X#%42,Y-A1,"2" 

5288 WEND 

218 EXEC MAUS 

3228 WEND 

32352 MAUSS="ECETL „FiCcTL „IepiSHIFT =3x<. 
SET, GIICTL BITEIL ,„>” 

Ss248 ENDFROC 

5258 PROC NEW 

3278 EXEC MENUE:? "_.Clear.screen. (Yes/N 


O)A?":EXEC WAIT_KEY 

5290 IF T=89 

5328 POKE AF,72B:MOVE AF,AF+%1,$1EB0: MOVE 
AF „AH,$1EOO 

S338 ENDIF 

5349 EXEC MENUE_INIT 

53589 ENDPROC 

5348 PROC FORMAT 

5378 EXEC MENUE:? "O.k.tosformat.disksin 

„drivesi?.(Yes/No)" 

5382 EXEC WAIT_KEY 

S539@ IF T=89 

5408 EXEC AUS:XIO 254,#%1,%0,22,"DI":EXE 

C AN 

5438 

5448 


ENDIF 
ENDPROC 

54508 PROC NDIR 

5450 LEER$="D:*.PIC":L=18:EXEC DIR:LEERS 
="tETL „YCCTL „ILETL „IECTL „IeCTL „>CCT 
PASTE, 3. 


5499 ENDPROC 

s5@@ PROC EDIR 

S51B LEERS="Dı#.#"ıL=13I:EXEC DIR:LEERS=" 
SCTL „IECTL „IEETL „ItETL „ItETL „>“ 
5540 ENDPROC 

sss5@ PROC DIR 

5548 REPEAT 

5578 EXEC AUS:CLOSE #%1:0PEN #%1,6,%8,LE 
ERS 

5598 REPEAT 

SA1B EXEC AUS: INPUT #%1,NAMES:SL=11 

5612 IF NAMES (5)<>"FREEASECTORS" 

562@ POSITION 19,%0 

5648 FOR I=%3 TO 18 

SaSB IF NAMES(I,I)="." THEN SL=SL-%1 
SAAB NEXT I 

5670 IF NAMES (12,%2)="."1? NAMES (Z3,L) 
56828 ELSE =? NAMES(#1,1S) :ENDIF 

5690 EXEC AN 

5788 WHILE STICK(%D)=15 AND PEEK(764)=25 


5 AND STRIG(A2} :WEND 

5718 IF FPEEK(784)<255 THEN GET T 

37/12 ENDIF 

728 UNTIL T=155 OR STRIG(%8)=%28 OR NAME 
E(H2,AZI<>"." OR T=27 

5758 UNTIL STRIG(#8)=%2 OR T=27 OR T=155 
748 CLOSE #%1 

5758 ENDPROC 








PROC MAUS 

A=STICK (48) 

K=X+XX# (ARB=AB) - (ARI=HB) 
Y=Y+ tAXRH2=HQ) - [A&H1=H0) 

IF Y>171 THEN Y=1971 

IF Y<-32 THEN Y=-32 

IF X>77 THEN X=77 

3858 IF X<XB8 THEN X=%8 

POKE 53251 ,X#42+48:MDVE ADR(MAUS$), 
PMB+Y,i11 

S586B ENDPROC 

2878 # FEHLER 

Se7B CLOSE #Z1:EXEC MENUE:EXEC AN 


SYB0 ? "su,Fehler.Nr.:." :ERR;".„.Taste/K 


nopf." 

5718 EXEC WAIT_KEY:EXEC MENUE_INIT 

5732 GO#+ START 

37420 FROÖC INPUT 

5r58 IF NOT (6) THEN EXEC MENUE:FOSITION 
2,8:7 "Savesas”?": NAMES (H1)="" 

sröB REPEAT 

5970 IF G:MOVE UN+Y#+42,,AH+Y#49,328: TEXT 
X,Y,„NAMES£ 

5788 ELSE :POSITION 11,8:7? NAMES; " 
IF 

5778 GET T:D=-T%1i727 

5818 IF tD>-%1 AND D<27) OR (D>31 AND D< 
125) 

sdza POS=POS+tPOS<L)} : NAMEF (POS ,„POS>’=CHR#+ 
{T} 

add ENDIF . 

535 IF T=12& AND POS=#8 THEN NAMEF="" 
sQsd IF T=i2& AND POS>%B8 THEN POS=POS-%1 
: NAME (POS+A1I="" 

E0972 UNTIL T=155 DR T=27 

6072 IF T=27 THEN POKE 754,28 

AED ENDPRDOC 

5278 PROC LAD 

sid EXEC NDIR | 

&i1Bß IF TS>27 DR NAMES (CH2,A2) <>". " 

&izB NAMEF(CH1,%2)="D: "NAMES (SLI=" PIC" 

6138 EXEC AUS:DPEN #%1,4,%2,NAME$ 

6148 BGET ##71,AH,„s1E88:BGET #%1,AF,#F1E89 
:ELOSE #Z1:EXEC AN 


"END 


6178 ENDIF 

6198 ENDPROC 

6200 PROC SAVE 

6218 6=%8:1L=8:POS=%4B:EXEC INPUT 

6220 IF T<>27 

68238 -MOVE ADR (NAMES (%1)) „ADR (NAMES (73) ) 
8 

= 

6248 NAMES (%1,%2)="D: " NAMES (POS+%Z) =" _Pp 
IE" 

6259 EXEC AUS:OPEN #%1,3,728,NAMES 

6268 BPUT #%1,AH,$1ERO:BPUT #%1,AF,$s1E00 


:CLOSE #X1:EXEC AN 

62978 ENDIF 

6388 ENDPROC 

7008 PROC CUT 

818 D=e#41:EXEC BOX:EXEC UNSAFE: P2=YıXA=X 
A DIV #2:Pi=ABS(X DIV %2-XA):EXEC SAFE:X 
x=%2 

7020 IF Y>YA AND X>XA 

7188 REPEAT 

7/1188 EXEC UNSAFE 

7128 FOR I=YA TO P2 

7122 IF (Y+rI)x*48-P2*40<%78 THEN POKE 764, 
ZB: EXIT 

7138 MOVE XA+UN+I#48,X DIV Z2+AH+ (Y+ID)#A 
B-P2=49-P1+71,P1i 

7140 NEXT I 

7158 EXEC MAUS 

71&8 UNTIL STRIG(#X8)=%48 OR PEEK(764)=28 

’/1ı78 IF PEEK(754)<>28 

7188 MOVE AF,„UN,7688 

7198 FOR I=yYA TO P2 

7200 MOVE XA+UN+I#40,X DIV Z2+HAF+Y+I)*4 
O-P2#49-P1+%71,Pi 

7218 NEXT I 


Listing. »Paint256« (Fortsetzung) 












ATARI ST 


WordStar 3.0 Diese Markt&Technik-Software erhalten 
| Sie in den Fachabteilungen der Woren- 
häuser, bei Ihrem Computerfachhändler, 
im Buchhandel oder direkt beim Verlag 
gegen Vorauskasse. Fragen Sie auch 
nach dem neuen Gesamtverzeichnis 





Dieses Standardprogramm mit welt- 
weitem Erfolg bietet Ihnen bildschirm- 
orientierte Formatierung, deutschen 








Zeichensatz und integrierte Hilfstexte. Fröhiahr/Sommer’87. Oder fordern Sie es 
Lieferumfang: Zwei 3'%-Zoll-Disketten mit ; direkt beim Verlag an. 
CPIM-Emulator und WordStar/Mail- 


Merge-Dateien, Originalhandbuch von 
MicroPro, Beschreibung der ATARI- 


Hardware-Anforderung: ATARI-ST- | 


Computer, 80-Zeichen-Monitor, min- mit aha für den 
destens ein 3'%-Zoll-Diskettenlaufwerk, ATARi ST 


Drucker mit Centronics-Schnittstelle. | 
Best.-Nr. 50106 
DM 199,-* (sFr 178,188 1990,-*) 


dBASE II 2.41 . Al % WordStar für ATARI ST 


Das bedienerfreundliche Datenbank- Das Buch für den mühelosen Einstieg in 
system dBASE Il beinhaltet eine eigene die Praxis der Textverarbeitung mit 


Dazu die weiterführende Literatur: 


MarkLEIschri Ararkaiitechrik 





314-Format 


u 








Nogemaiscpteiche für uno } \WordStar. 

individueller Programme. lwurde | Best.-Nr. 90208, | a -O8- 
unter dem eebeiysien GEM-TIOS | Sr Hast ne 
den ATARI-ST-Computern angepaßt und dBASE Il für die ATARI ST 


läßt sich komfortabel über Pull-down- 
Menüs mit der Maus steuern. 


Lieferumfang: 3'R-Zoll-Diskette, 
Öriginolhandbuch von Ashton-Tate, 
Beschreibung der ATARI-spezifischen 


Zu einem \Weltbestseller unter den 
Datenbanksystemen das klassische 
Einführungs- und Nachschlagewerk. 
Best.-Nr. 90206, ISBN 3-89090-206-5 





GEM-YVersion. an Tarl | Jedes Buch kostet DM 49 - 
ea ATARI-ST- unter GEM-TOS | (sFr 45,10/85 38220) n 
Computer mit Betriebssystem im ROM | Erhältlich bei Ihrem Buch- oder 
(260 ST, 520 ST, 520 ST+, 1040 ST),ein 3W“-Diskette für @ ei = 
3'h-Zoll-Diskettenlaufwerk, Drucker mit NER ‘a AIDS Sa Rndien 
Centronics-Schnittstelle. | inkl.MwSt 

Best.-Nr. 50308 | “ Unverbindliche Preisempfehlung 


DM 348,-* (sFr 295,-/85 3490,-”) 





Markt&fechnik 


Zeitschriften - Bücher 
Software - Schulung 
Markt&Technik Verlag AG, Buchverlag, Hans-Pinsel-Straße 2, 8013 Hoor bei München, Telefon (08%) 4613-0 


Bestellungen im Ausland bitte an: SCHWEIZ: Morkt&Technik Vertriebs AG, Kollerstrasse 3, CH-6300 Zug, Telefon (042) 41 5656 - ÖSTERREICH: Rudolf lechner & Sohn, 
Heizwerkstraße 10, A-1232 Wien, Telefon (0222) 677526 - Ueberreuter Media Verlagsges. mbH (Großhondel], Alser Straße 24, A-J0?] Wien, Telefon (0222) 481538-0. 
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Cosinus macht Welikarriere 
Comic-Weltkonzern Bulls nimmt Computerfreak Cosinus 
unter seine Fittiche 


Listings über Listings für C64 und C 128 


Gelungene Reversi-Voriante oder eine raffinierre RAM- 
Disk für den C 128 im 64er-Modus 


Welchen 16-Bitter soll ich kaufen? 
Umfangreicher, zweiteiliger Vergleichstest der 16-Bit- 
Computer 


Atari ST: 
3D Zeichen: und Animationsprogramm »GFA-Objekt« 
wird mit anderen vergleichbaren Programmen getestet 


= 


Fee 





So geht’s: e unter MS-DOS 
Basic Kins Elser OW. Basic und das Basic-2 der 
Schneider-PCs 


Exklusiv: Die Vizawrite-Story 
Der Programmierer der Vizawrite-Programme 


Gu' tschein 


FÜR EIN KOSTENLOSES PROBEEXEMPLAR VON HAPPYCOMPUTER 


SETS. a Dee Karmann 
Senden Sie mir bitte die aktuel Be Abe kkienlasck Fobaeiempkt Wahr HERE 
ällt und ich es regelmäßig weiterbeziehen möchte, brouche ich nichts zu tun: Ich erhalte »Haı 
dere dem veginabig ie io ihn möche, buche ich che zu ch erhal on Einzel- 





handel | 


[ Soße Arge 








Datum i 1. Unterschrift 


a ist ee daß ich diese Bestellu innerhalb von 8 Tagen bei der Bestellodresse widerrufen kann 
i ee: dies durch meine zweite Eee eschrik: Zur Wahrung der Frist genügt die rechtzeitige Absendung 


Dotum 2. Unterschrift 


S 
Gutschein ausfüllen, ausschneiden, in ein Kuvert stecken und absenden an 
Markt& Technik Verlog Aktiengesellschaft, Vertrieb, Postfach 1304, 8013 Haar ar 














ELSE 
| EXEC UNSAFE 
ENDIF 

ENDIF 

XX=%1 
ENDPROC 
PROC RAY 
REPEAT 


EXEC LNE:EXEC HELL:EXEC SAFE:IF CH= 


12 THEN KA=kı YA=Y 
7358 UNTIL PEEK(754)=28 DR Y<%1 
73978 ENDPROC 


Listing. »Paint256« (Schluß) 


1iB18 REM in 256 Farben. 


183528 REM Voraussetzung: 
1848 REM Atari XL/XE 
1858 REM Floppy (Turbo Basic XL) 


IRB REM Grafikerweiterung fuer 254 Farb 
en 

12378 REM (COL256.BIN auf Diskette in Lau 
fwerk 1) 

Ia38 — 

18978 REM {c) by Stephan Gerle 

i1lBa — 


1118 EXEC FARB2SS_INIT 
1128 GRAPHICS %8 


1138 DIM LUs(12) „ROr(12) „FILEF (28) „LEERF 


(2558) 


1148 LUS="XCTL. SHICTE: „FICTE SFICTL „FE 
TE HLETE SIEETL „ILETL „HET s>ZESE CT 
| L >3CTL „FCCTL „>"sROs="CCTL „YCCTL „> 
| ESC CTL >3ICTL AFCCTL AYTCTL AYCTL Arc 


TL AYLCTL AFLCTL AYCCTL „ItCTL „+" 
1158 # MENUE_NEU 
1162 POKE 82,%2:CL$ 


1178 SETCOLOR #%1,%98,12:SETCOLOR %2,%798,%8 
1188 ? "„.Mandelbrotmenge. (Äpfelmaennche 


n) u 


1198 ? "nach„Spektrum.der“Wissenschaft.i 


n/a" 


1200 7 "una nana (c)ıb y„Stephan.Gerl e" 


1218 POKE 82,5:7? 


1228 ? 
1238 ? 
1248 7? 
ı258 ? 
i2&B ? 
1278 ? 
ı280 ? 
1270 ? 
1308 7? 
1510 ? 
15328 ? 
1358 ? 
1348 7? 
1358 ? 
1550 7 
15378 ? 


"Laden„Bild" 
"Speichern“Bild" 
"Berechnen„Bild" 
"AusschnittsvomaBild" 
“Birectory" 


"Umschaltenszum.Bild: SELECT" 
"VomaBild.zum.Menues: „START" 


"Aktuelle,.Parameter:" 


Am IE Supra MEREIEGN Aa: Seife, Mm: MEN Tamm MMO HEMENEN immer HEN GEN: mn (BAEARE. ARMEE. ci: (rar 


"Real-Teils.u...,. (0x), 2." ;AECKE 
"Imaginaer-Teil-(y).:."3BECKE 
"Seitenlaenge... (s):.";SEITE 


"Ihre.Wahl?."; 


1388 MENUE=DPEEK (88) 

1398 MENUEDLST=DPEEK (568) 

1428 # START 

1418 DPOKE 548 ,MENUEDLST 

1420 DPOKE S8,MENUE:POKE 87,%8 
1438 POSITION 22,19:7 “";3 

1440 REPEAT 


1458 UNTIL FEEK(SDBIF)I=5 OR PEEK (764)<25 


=) 


1460 IF PEEK($DQIF)=5 

147@ D=USR ($9620 64) 

1488 WHILE PEEK($DRIF)<>6:WEND 
1499 D=USR ($D4D0,20) 

1580 ELSE 

1518 GET TT:TT=TT%95: T=%8 


1528 IF CHR$(TTI="S" 


15390 IF ECHR$S(TT)="L" THEN EXEC LADEN 





Mandelbrotmenge /Apfelmaennchen 


THEN EXEC SPEICHERN 








1548 


IF CHR$(TTI="B" THEN EXEC EINGABE:E 


XEC RECHNEN: T=%1 


1558 


IF CHR#(TT}="A" THEN EXEC AUSSCHNIT 


T:EXEC RECHNEN: T=%1 


1568 
: T=%1 
1578 
1588 
1598 
1592 
1519 
1828 
1838 
1542 
1558 


IF CHR#CTTI="D" THEN 7 :DIR :GET TT 


IF T=X1 THEN FOP :560# MENUE_NEU 
ENDIF 
G0# START 


PROC EINGABE 


7 


7? "Realteil,der „lLinken.unteren.Ecke 


INPUT "X="  AECKE 


? “Imaginaerteil.der.linken.unteren 


„Ecke" 


IibA8 
1678 


INPUT "Y=",BECKE 

? "Seitenlaengedes.Ausschnitts" 
INPUT "S5=",SEITE 

7?” "Maximale,Ilterationstiefe" 
INPUT "T=",TIEFE 

ENDPROC 


PROC RECHNEN 

D=USR ($2409,,64) 

POKE AH,ZB:MOVE AH,AH+A1,#1DFF 
MOVE AH„AF,S1E90 
SPALT=SEITE/168 

POKE 87,9:DPOKE 88,AH:COLOR 8 
TEXT 49,%28,5TR$(AECKE) 

TEXT 18,8,5TR$ (BECKE) 

TEXT %723,18,5TR# (SEITE) 

DPOKE 88,AF:CODLOR & 

TEXT 710,48, STR$ (AECKE) 

TEXT 28,8,5TR$ (BECKE) 

TEXT %8,15,5TR$ (SEITE) 

FOR M=%8 TO 159 
BC=M&SPALT+BECKE 

FOR N=18 TO 157 STEP #2 
AC=N+SPALT+AECKE 
AZ=YB: BZ=%.0: ZAEHLER=%Q 
REPEAT 
AB=AZ:A2=AZ*%2:B2=BZ*%2 
AZ=A2-B2+AC 

BZ=472=AQ*BZ+BC 
ZAEHLER=ZAEHLER+%1 

UNTIL (A2+B2>4) OR (ZAEHLER>TIEFE) 
IF ZAEHLER<=TIEFE 

COLOR ZAEHLER MOD 16 

DPOKE 88,AH 

PLOT N DIV %2,191-M 

COLOR (ZAEHLER DIV 164) MOD 16 
DPOKE 88,AF 

PLOT N DIV #2,1971-M 

ENDIF 

IF PEEK($DOiF)<>7 

IF PEEK ($DB1F)=& 

POKE 559 ,$22:D=USR (584598,64) 
ELSE 

IF PEEK(SDEI1F)=5 

POKE 559 ,%2:D=USR (504098, %0) 
ENDIF 

ENDIF 

ENDIF 

NEXT N 

NEXT M 

D=USR ($8400,,%2) : GRAPHICS %8 
ENDPROC 


PROC SPEICHERN 
4 


7?” "Nummer “des„Bildes."; 

INPUT NR 

FILE$="D: APFEL" 
FILES$S(LEN(FILE$) +%A1)=STRE$ (NR) 
FILE$(LEN(FILE$) +41) =".PIC" 
TRAP #FEHLER 

OFEN #41,8,48,FILE$ 


Listing. »Apfel256« 








18928 
i2810 
18828 
’ 

128323 
129040 
13058 
12950 
12074 
12082 
12378 
n 

12188 
18112 
18128 


BPUT #%1,AH,$1E80 

BPUT #Z1,AF,$1E20 

7? #%1,STR$ (AECKE) 

7 #%1,STR$(BECKE) 

7? #%1 ,STR$ (SEITE) 

# FEHLER 

CLOSE #71 

POP :60# MENUE_NEU 
ENDPROC 


PROC LADEN 
= 


7?” "Nummer „des.Bildes."; 
INPUT NR 

FILE$="D:APFEL" 
FILEF(LEN (FILES) +41)=STR$ (NR) 
FILE$ (LEN (FILES) +ZA1)=".PIC" 
TRAP #NICHT_VORHANDEN 

POKE 73,%8 

OPEN #%1,4,%78,FILEF 

BGET #%1,AH,$S1EBO 

BGET #%1,AF,F1E28 

INPUT #%1,FILE$ 

AECKE=VAL (FILE$) 

INPUT #%41,FILE$ 

BECKE=VAL (FILE#) 

INPUT #%1,FILES 

SEITE=VAL (FILE$) 

# NICHT_VORHÄANDEN 

CLOSE #%1 

POP :60# MENUE_NEU 

ENDPROC 

PROC AUSSCHNITT 

D=USR (598698 ,65) 
PMB=112:POKE 54277,PMB 
PMB=PMB#255+1824+214 

POKE 559,58 

POKE 53256 , 48: POKE 53257 ,%8 
POKE 784,255:P0OKE 785,255 
POKE 53277,%2 

XK=48: Y=%8 

AB=8 

MOVE ADR(LEER$) „PMB-214,256 
MOVE ADR(LEER$) „PMB+2564-214,255 
POKE 87,9:DPOKE 88,AH:COLOR 8 
AA=AECKE: BB=BECKE: SPALT=SEITE/88 
REPEAT 

POKE AH,%2 

MOVE AH,AH+ZI,7&0 

TEXT %8,%8,STR$ (AECKE) 

TEXT %8,8,5STR$(BECKE) 

TEXT %8,15,5TR$ (SEITE) 
A=STICK (48) 

IF STRIG(%8) 

K=X+ (A&LB=HO) - (Akd=HB) 

YzyY- (A&H2=EHD) + (ARZ1I=Y2) 

IF X<#8 THEN X=%8 

IF X+RE>88 THEN X=X-41 

IF Y<S#B TFIEN Y=48 

IF Y+AB?58B THEN Y=Y-%1 

ELSE 

AB=AB+ (A&3=%B) - (A&4=%0) 


PROC FARBZSS_INIT 
REM Grafik mit 256 Farben 
REM Aufruf mit D=USR($599,6TIAMode 


REM Ausschalten mit D=USR(#&2Q,8) 
REM Helligkeitsbild bei AH=+8818 
REM Farbbild bei AF=sAQI12 
AH=FSB1B: AF=SAB1O 

POKE AH,AB:MOVE AH,AH+Z1,F1IDFF 
MOVE AH,AF„F1EBQ 

FPOKE 185,128: REM Speicher schuetze 


REM Display-List aufbauen 


— u 





5459 BLOAD 


IF AB<%1 THEN AB=%i 

IF X+AB>S58 THEN AB=AB-#1 
IF Y+AB>S8 THEN AB=AB-%Ki 
ENDIF 

POKE 552498, X#42+48 

POKE 53249 ,‚X#22+48+AB#2 
MOWE ADR(LUF) „PMB-Y=%2,12 


MOVE ADR(ROS) „PMB-Y#%2-12#AB+264,12 


AECKE=AArFX=#SPALT 
BECKE=BBE+Y#SPALT 
SEITE=SAB#+SPALT 

UNTIL PEEK(#DBIiF})=& 

POKE 53248 ,%8:POKE 53247,%8 
D=USR (9598,48) :GRÄAPHICS %8 
” "Maximale.lterationstiefe" 
INPUT TIEFE 

ENDPROC 


PROC FARBZSS_INIT 
REM Grafik mit 2564 Farben 


REM Aufruf mit D=USR(#4893,6T1IAMode) 
REM Ausschalten mit D=USR ($629,8) 


REM Helligkeitsbild bei AH=$80198 
REM Farbbild bei AF=$AQ18 
AH=$3212: AF=$ADIO 

POKE AH,ZE:MOVE AH,AH+%1,$1DFF 
MOVE AH,AF,$S1E8® 


POKE 185,128: REM Speicher schuetzen 


REM Displaylist erstellen 


A=$7808: ADA=AH: ADB=AF+4B 


POKE A,112:POKE Ar%1,2408:POKE A+%X2, 


FOR I=A+13 TO Ar%35+(191#%3) STEP 6 
POKE I,$CF 

DPOKE 1+%1,ADA 
ADA=ADA+82 

POKE I+%43,$CF 

DPOKE I+4,ADE 

ADB=ADB+88 

NEXT I 

POKE I,65 

DPOKE I+ti1,A 
A=$7CRB: ADA=AF : ADB=AH+4B 


FPOKE A,il2:POKE A+#1,112Z:POKE Ar%2, 


FOR I=A+23 TO A+%43+(191#%3) STEP 6 
POKE I,$CF 

DPOKE I+71,ADA 

ADA=ADA+82 


POKE I1+%43,$CF 


DPOKE I+4,ADB 


| ADB=ADB+58 
| NEXT I 
FOKE I,„65 


DPOKE I+41,A 


iterung laden 


3478 
>488 


ENDPROC 


Listing. »Apfel256« (Schluß) 


10138 
181408 
„242 

12159 
12160 
12170 
12182 
19199 
12200 
18218 
19228 
18238 
19248 


A=F78B88: ADA=AH: ADB=SAF+40 


POKE A,„112:POKE Ar%1,248:POKE A+rZ2 


FOR IsA+%5 TO Arf35r(i191%*%5) STEP 5 


POKE I,„$CF 
DPOKE I+%1,ADA 
ADA=ADA+88 
FOKE I+rk35,&£CF 
DPOKE I+4,ADB 
ADB=ADB+58 
NEXT I 

POKE I,65 
DPOKE I+41,A 


Listing. »FARB 256« 


"D:COL258.BIN":REM Grafikerwe 








Ah=$7CB2: ADA=AF: ADB=AH+42 
POKE A,112:POKE A+ä1,112:FOKE A+%2 


FOR I=A+#3 TO Arks+rt1P1#r%5) 
FOKE I1,$CF 
| DPOKE I+#1,ADA 
ADA=ADA+528 
 FOKE I+%3,#CF 
DFOKE I+4,ADB 
ADB=ADB+88 
' NEXT I 
| POKE 1,65 
| DPOKE I+#1,A:G5RAPHICS 8 
BLOAD "D:COL256&.BIN":REM Grafikerw 
eiterung laden 
18358 ENDPROC 


Listing. »FARB 256« (Schluß) 


sSTEF & 









188 EXEC FARB2SS_INIT <LDO> 
112 D=USR($B6B0,64) <RT> 
120 POKE 196,128 <NE> 
138 COL=3:LUM=& <oH> 
140 DPOKE 88,AH <aN> 
158 POKE 87,9 <BE> 
162 FOR I=8 TO 79 <AB> 
178 COLOR INT(1/5) <HR> 
182 PLOT I,8:DRAWTO 1,191 <HF> 
198 NEXT I <6I> 
208 DPOKE 88,AF <PC> 
210 FOR I=B TO 11 <DY> 
229 COLOR INT(1/12) <OX> 
238 PLOT B,I:DRAWTO 79,1 <2M> 
240 NEXT I <GA> 
258 OPEN #1,4,8,"K:" <PL> 
258 GET #1,J:CLOSE #1 <RU> 


Benötigen Sie für Ihr Programm ein Copyright- 
Zeichen? Kein Problem. Mit unserem Programm 
lassen sich Zeichen einfach selbst entwerfen und 
in eigene Basic-Programme einbinden. 


tellen Sie sich folgende Szene vor: Sie sitzen an 
Ihrem Computer und tippen gerade die letzten Zeilen 
Ihres neuen Programms ein. Dadurchfährt es Sie wie 
ein Blitz: Sämtliche Umlaute in den begleitendenden Bild- 
schirmtexten haben Sie als »ae«, »oe« und »ue« eingege- 
ben. Sie taten das ganz automatisch, denn standardmäßig 
hat der Atarı Computer keine Umlaute auf der Tastatur, und 
im Laufe der Zeit schreibt man halt die Umlaute nach 
Kreuzworträtsel-Schema. Nur, schön sieht das natürlich 
nicht aus. 

Der Atari hat zwar einen zweiten Zeichensatz eingebaut, 
und dieser enthält auch jede Menge verschiedener Son- 
derzeichen. Das deutsche »B« ist jedoch nicht vorhanden. 

Konstruieren lassen sich die Zeichen mit einem Zeichen- 
satzprogramm. Und genau so etwas wollen wir Ihnen hier 
vorstellen: Ein Programm, mit dem Sie völlig problemlos 
eigene Zeichen malen und Zeichensätze in eigene Pro- 
gramme einbinden können. 

Das Programm besteht aus zwei Teilen. Der erste Teil, 
das Hauptprogramm, ist in Turbo-Basic geschrieben. Die- 
ses Programm benötigt ein weiteres in Maschinensprache 
geschriebenes Programm, das wir als AMPEL-Listing 
gedruckt haben. Speichern Sie es bitte auf der gleichen 
Diskette wie das Hauptprogramm. 











Zeichensätze selbstgestrickt 



























D=USR ($9692,0) 
SRAPHICS B:END 


Ss2@ PROC FARB2SS_INIT PB? 
318 AH=tBB1d: AF=SFAB1IO <HO> 
s28 FOKE AH„#2:MOVE AH,„AH+AI,„FiDFF “SH? 
530 MOVE AH,„AF„Fi1EBO „IE> 
542 POKE 185,128 <NK> 
354 A=+7808: ADA=AH: ADB=SAF+4O <D6> 


548 POKE A„112:POKE A+#1,248:POKE ArZ2,2 
40 <HR> 
378 FOR I=sAr%35 TO A+rZ3+ti191#4D STEP & <SsU> 


388 POKE I,„$CF 











398 DPOKE I+Z1,ADA <PJ> 
400 ADA=ADA+BB <HH> 
418 POKE I+%3,$CF <KR> 
428 DPOKE I+4,ADB <NIF 
438 ADB=ADB+39 IXK> 
440 NEXT I <6Cc> 
458 POKE 1,65 <SU> 
468 DPOKE I+%1,A <DSs> 
478 A=$7C08: ADA=AF : ADB=AH+48 <SU> 


458 POKE A,i112:POKE Arfi1,112:POKE A+%2,2 


490 FOR I=A+25 TOD A+%35+(191%*%43) STEP &  <SZ> 
SaR FOKE I,SCF <cv> 
518 DPOKE I+%71,ADA <oV> 
528 ADA=ADA+SB <HR> 
530 POKE I+43,$CF <KH> 
542 DPOKE- I+4,ADB <NN> 
S5Q ADB=ADB+88 <XP> 
560 NEXT I <CH> 
578 POKE I,85 <$2> 
580 DPOKE I+%1,A:6GRAPHICS 8 <aN> 
598 BLOAD "D:COL256.BIN" <LD> 
682 ENDPROC <KI> 


Demonstrationsprogramm für 256 Farben 





Wenn Sie den »Char-Maker« starten, sehen Sie nach kur- 
zer Zeit das Menü. In der linken oberen Ecke befindet sich 
das Fenster zum Malen der einzelnen Zeichen. Gleich dar- 
unter steht der Code des gerade bearbeiteten und im Fen- 
ster sichtbaren Zeichens. Unter diesem erscheint eine 
Anzeige, die Auskunft über die gerade eingeschaltete 
Farbe gibt, sowie eine Zeile, die über die verwendete Gra- 
fikstufe informiert. | 

Gleichzeitig leuchtet nach dem Starten des Programms 
in der oberen linken Ecke des Bildschirms ein Quadrat auf. 


= _. # Kopie Zeichen ITErh? 
ie FR, EL £ : er ; < F = | as. ena 
SA TEF FIT Te gen 
926 'BS 
EIN TEEN u 


U EEE mu WE Er BE ee er eo Br er ee Ge Te er ee ee sr er Ve 


Paar ts arten 


Frogrammname :CHAR.OBJ B172:B2 DO 08 Ba 
Länge 2312 Bytes pB1ire:20 Da za Ba 
en ee ne - 2Bi8d:02 Bd DZ 22 

2188:08 85 DE 50 
oaad:FF FF OG 80 Bü 89 4C 47 <B> 231972:09 DO BB 88 
aaga:55 4C 55 95 4C C7 BA 4C <TCH BIFE:02 DO BG 89 
BaıB:4A 87 ACC 753 87 SC DE 87 17 > BiAB:BO DB Da 20 
aa1B:4C 32 88 ACC FA 85 4C BC {5327 BIAB:BA AB BF 4B 
2020:83 4C AS 88 4C Di 58 4 <44> 2B1B38:4C 99 18 &D 
3828:Di 88 4C Di 88 4C Di 88 <ES> B1iBS:äB AB 78 22 
BOSB:4C DI 88 4C DI 88 AC DI Söä> 81C29:21 DO Bi 88 
BR58:59 BB BO Bo DO GB BB DB <7C> B1C8:81 CB EC IA 
D240:00 BE BD DO BO Ba Da Du <40> 28109:27 834 DB Bi 
BRsB:00 BO Da Do BR BO Ba Ba <> 2B108:D8 81 CB 98 
2350:00 508 Bi 598 DZ Da 85 BR <ZE> BIEGB:&40 AD 35 58 
Ba5Ses:05 FO FB FO FO FO Ad FO <BS> B1IES: SG Ah AD 34 
2940: 47 BE BA 427 BO DB BZ 82 <DD> BiFQ:57 10 AB 68 
Bas: BZ BZ BZ BZ BZ BZ BZ 683 BiFaö:SD 80 20 DB 
nar7B:02 BZ BZ BZ BZ DZ D2 AB <BE> AZBaR:Dpa 05 A7 00 
aa7a:20 #42 Al 99 BZ BZ BZ BZ <BE> 0289:3D 88 DO SC 
2R58:82 B2 82 41 57 88 08 Da <5B> 2218:88 EC SC 588 
os: Da 73 28 21 32 BD ZD <B> 2218:38 40 AD 47 
BarG:21 2B 25 32 Ba DO D2 Ba <B5> 2B2228:88 BD 47 58 
BB78:00 DB BR Ba Ba BB Bi BB <AÄlc> g228:4D 4A B2 AE 
DAAB:Z4 Ai DA Da Ba aa Ba aa <FB> 2238:18 &D 4A 88 
Ba: DB Bd BE Ba Da BB Da <AB> B238:0 AB BZ B& 
PABO:DO Da Da Da Ba Da Ba Ba <B> 2248:57 58 85 CC 
GRBB:ER DR DE Ba BE Da Ba BE <BS> B248:A7 Da 71 CB 
BECcH:02 Ba DB Ba DB Ba Ba Da <ch> B258:FF7 AC 45 808 
PACS:2B GO Da Da aa Da Ba Ba <CB> 2258:CB CB CA 18 
bEDbB:00 DB DB BO BO Ba Ba Bu <DB> B2&B:BE BA DR 50 
PODS:Ba Be Ba Da aa ma ma aa <DE> B2858:14 48 27 18 
DBERB:DB DO DO BO Ba Da BO Bi <EB> B278:FF 498 58 29 
DOES: DA DA Da Da Da Da Ba Ba <Eä> 2278: AD 35 82 DO 
DBF2:D2 08 DB 20 Ba DB BO BB <FB> 2238:C097 BF FB OA 
Bares: Ba Da DO DO Ba Da Ba Bi <Fär 2288:085 EE 75 88 
2B100:02 28 22 29 B2 za na Du <a2> B2728:8D 75 88 Ab 
B1dE:02 BB DB DO BO 20 BO Ba <i> 2298: 80 AD 75 308 
B11l2d:098 DR Da Da Da Da Da Da <i2> BzAB:A? 49 SD 975 
01185:00 28 22 20 20 DO O0 BB <iA> B2AS:14 Ah 70 BB 
2B178:29 20 Da Ba Da Ba Ba De <22> B2BB:1iA AD 47 808 
g1728:B2 02 BB pa Da Ra Da am <2A> BZBS: AD 34 BE C? 
21308:20 20 Ba BE Da Da Ba Ba <32> 2208:55 88 C? 087 
2B138:08 BO BO Bd DO Da Da BB <3A> B2CS:5D 75 BZ AE 
2149:20 2a Do oa oa ma ma Ba <42> 22D8:88 28 EE 81 
Bl48:09 BB BO DO BO BE DE DE S4A> 02D8:81 BE SC 80 
2158: 289 Ba Da Da Ga Da Ba Ba <52> BZEB:AB SD 974 58 
2159:08 29 29 BO DE De Da Da <> BZES: 11 AD 35 58 
B158:80 DO Ba Ba Ba Ba Ba BE <B> BZFa: AD 34 BB C# 
2158:09 29 2g oa Da ma Da BB <Ah> BZFa:74 SO 159 AD 


2a Ba Ba Be <72> B5B0:80 AC 74 88 FA 85 ED SC <F4> 
Da Da Da Ba <> BS5RB:88 27 FE CF 289 90 BB AP <i1D> 
Ba aa Be BE <B> 2510:80 ED 3C 88 AD 35 80 ED <ArF> 
ga ga ma Bi <AA> 23518:33 88 EC 85 Da Ab 34 88 <A7> 
2a Ba Ba Bi <92> 05208:18 &D 3D 88 C#? 12 98 88 <E2> 
Da Ba Ba Da <FA> 2528:AF Ba 80 SD 88 AD 54 Bi <AB> 
Ba Du Ba BA <2C> 8358:8D 34 82 AB SD Ba BD AA <Fi> 
88 85 CB BF <C5> 0558:80 .AD SC 98 5D 47 BO 28 <EB> 
57 808 85 CC <54> 054B8:14 52 AF 797 8D Da 2 AF <SAF> 
AB Ba BA 297 <AB> 0548:84 8D 81 BZ 4C 22 E44 58 <CF> 
BA 27 982 DO <DD> BSSB:EE 35 88 A? 40 OD BE D4 39> 
gB AB BB BA <Erf> 8358: AD 57 80 ED B7 Da AP BI <B> 
88 BA 27 83 {77> 2558:8D 1b DB AD ZF BZ 87 BE <58> 
AA AC 3A 808 <B4> 2358:8D ZF B2 AT Bi ED 497 88 <67> 
DA BA 18 57 S5D> 03780:5D 4A 50 AFP B1 SD 5F BZ <C6> 
0 BA BA 18 <5&> 8378:A7 FF ED SC DB AF 87 A2 <sBö> 
BE 35C 88 BC <BE> 2598:92 AB 51 28 SC E4 AFP BI <DC> 
81 EC 36 88 <9F> B588:8D 47 88 58D Ah BB AS 58 72 
BSD 47 88 CC <1D> 2578:5D SE 80 AS 57 BD SF 88 <72> 
AF BB 8D Ah <EF> 0398:47 57 8D 39 22 AF 80 BD <T7E> 
Da 32 15 4B <F5> 25AB:31 B2 AP 77 BD BB 22 AP <7D> 
Ba 19 &D 47 <A2> B85A8:84 8D BI 82 AF CO ED BE <Ci1> 
rb 48 88 15 <iE> 25B8:D4 AZ Bd EE 535 BB BR BE <2CH 
57’ 808 F@ B4 <DF}> 05B5:74 88 20 25 84 AE 74 BB {89> 
8b 48 808 AZ <F5> 3a5C8:F7D Al 89 ES DB FO 28 DS <FF> 
CE ?8 18 AD <I1E> B35C8:84 A? oa 8D 35 80 40 18 <4h> 
AB 7F AZ 33 <äcy 25D8:A5 58 55 CD BD 42 82 AS <B4> 
88 CE FF DE {#8 23308:57 597 BB 8D 45 88 AS CE <B> 
ED 535 88 #1 <AE> SSEB:FB 15 AD 42 88 18 5% 28 <D2> 
F7 RE 47 88 <AB> B5ES:SD 42 88 90 BI EE 45 BB <74> 
4C 306 83 A5 <Z2A> B5Fa:C& CE i8 70 EF Ab 42 80 <5B> 
Da 04 48 47 <16> OSF8:85 ED Ab 45 BA 85 CE AB {B8> 
SF SD 12 DE <28> 2400:58 EE 35 80 58 &8 85 CD <0#> 
E?7 AD 78 B2 <iC> n4B8:58 48 85 CE 58 48 BD FA <Bl>r 
CD Ad Ba Da “B1> 24108:808 28 C9 85 Ad 00 AD SA <5A> 
Da BE AF BB <31> 2418:598 Fa BD Bi CD 47 88 91 <ZA> 
’8 22 8D Ab <Fa> 2B428:C0 CS CE 3A 88 18 FO EE (bF> 
CC? 40 79 07 <20> B428:CE 35 80 20 AZ BO BE 46 <FB> 
58 Da 85 AS <32> 24532:80 C7 BO BB 297 7F CH 20 <24> 
AD 38 88 FB <C9> 0458:BO 24 57 40 Fa 07 CF 50 <BC> 
27 B4 FB 15 <öA> 8449:B0 853 38 EF 28 28 19 85 <39> 
BS BB GC Ab <94> 2448:07 89 EE 44 889 48 297 7F <xBDl> 
Ba B5 A? BB <I1E> B458: AZ BO 85 CC BA 28 CC DA <4l> 
“7 BB AC 48 <35> B8458:2& CC BA 24 CE 85 CB AS <B9> 
EO 89 28 BES <7C> B450:CC SD 58 59 85 CC 55 SB <SAd> 
Sc 3D 89 A497 <Bl1> B488:8E BA D4 CA Da FA 58 58 <Sä7> 
AD 38 88 FB <CD> 0470:DS 15 57 Bi SD DO DZ 58 <78> 
CC? 58 Ba BA <DE> 0478:67 BO SD BI BZ 35 40 48 <4Db> 
BE BO AS EE <CH> B450:8A 48 AZ OF 208 42 84 AZ <358> 
55 88 äb 30 <65> D438:04 BD 76 BE 9D 15 Da CA <45> 


Das ist der Cursor des Programms. Mit ihm werden die ein- 
zelnen Menüpunkte ausgewählt. Wenn Sie jetzt einen Joy- 
stick an Port 1 anschließen, können Sie den Cursor mit dem 
Joystick über den gesamten Bildschirm bewegen. Fahren 
Sie einmal über einzelne Menüpunkte hinweg. Sie sehen 
dann, daß die Menüpunkte, über denen der Cursor gerade 
steht, invers dargestellt werden. Indem Sie den Joystick- 
knopf drücken, wählen Sie den jeweiligen Menüpunkt an. 
Die einzelnen Menüpunkte bedeuten folgendes: 

Eingabe: Damit läßt sich ein Zeichen aus dem Zeichen- 
satz in den Zeichenbildschirm kopieren, um es zu verän- 
dern. Nachdem Sie diesen Menüpunkt angewählt haben, 
erscheint unter der Codezahl ein kleiner Pfeil. Indem sie 
den Joystick dann hinauf- oder hinunterdrücken, läßt sich 
die Codezahl abwandeln. Der Pfeil ist auch nach rechts und 
links verschiebbar, um die Zehner- und Hunderterstellen 
der Codezahl zu verändern. Durch Druck auf den Joy- 
stickknopf beenden Sie die Eingabe, und das ausgewählte 
Zeichen erscheint im Zeichenfenster. 

Nächstes Zeichen: Mit diesem Menüpunkt wählen Sie 
das Zeichen mit der darauffolgenden Codezahl aus und 
holen es vom Zeichensatz ins Zeichenfenster. 

Lösche Zeichen: Das Zeichen mit der ausgewählten 
Codezahl wird gelöscht. 

Kopiere Zeichen: Kopiert ein über die Codezahl aus- 
wählbares Zeichen an die gerade bearbeitete Stelle des 
Zeichensatzes. 

Lösche alles: Löscht den gesamten Zeichensatz. 

Intern. Zeichensatz: Hiermit kopiert man den Atari- 
Zeichensatz mit den internationalen Sonderzeichen in den 
Arbeitsspeicher des Programms. 
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Standardzeichen: Wie oben, nur mit dem normalem 
Zeichensatz. 

BSAVE: Speichert einen Zeichensatz auf Diskette. 

BLOAD: Lädt einen Zeichensatz von Diskette. 

Directory: Zeigt das Inhaltsverzeichnis der Diskette an. 
Gleichzeitig läßt sich ein Zeichensatz wie bei BLOAD 
laden, indem der jeweilige Directory-Eintrag mit dem Cur- 
sor ausgewählt wird. 

Spiegeln: Das Zeichen im Zeichenfenster wird gespie- 
gelt, wobei zwei Spiegelachsen zur Verfügung stehen. 
Diese werden durch Hoch-Nieder- oder Links-Rechts- 
Bewegung mit dem Joystick ausgewählt. 

Invers invertiert das Zeichen im Zeichenfenster. Helle 
Punkte werden in dunkle und dunkle Punkte in helle Punkte 
umgewandelt. 

Verschieben: Verschiebt ein Zeichen in der angegebe- 
nen Richtung. Die Richtung wird durch den Joystick ausge- 
wählt. Bildschirmpunkte, die aus dem Zeichenfenster hin- 
ausgeschoben werden, kommen am gegenüberliegenden 
Rand wieder zum Vorschein. 

Graphics 0 stellt den gesamten Zeichensatz in dieser 
Grafikstufe dar. Ein Zeichen besteht aus acht mal acht 
Punkten. 

Graphics 1 stellt den Zeichensatz in Grafikstufe 1 dar. 
Ein Zeichen besteht ebenfalls aus acht mal acht Punkten. 
Eine extra Anzeigemöglichkeit für Grafikstufe 2 ist nicht eein- 
gebaut, da die Zeichen dort zwar doppelt so hoch darge- 
stellt werden, ansonsten aber genauso aufgebaut sind wie 
in Grafikstufe 1. 

Graphics 12: In einem Zeichen lassen sich jetzt vier Far- 


ben darstellen. 











24791:10 
2498:84 
Nn459:D4 
B4A8:D4 
D4RA: 80 
2a4B8: Ar 
B4C9: SD 
D4CB: 597 
B4D9B:SD | 
A4D8: 57 
B4ED:AF 
B4EB: BD 
DB4FR: BD 
D4FB: DE 
9502: D0 
2508:8D 
B510:22 
23518: 28 
3320: 20 
23528: 20 
8530: 28 
B558:CB 
25409:80D 
2548: A? 
0550:58 
2558:01 
BS5hd: 2D 
2558: 720 
DB572: 974 
B578: Al 
B580:80 
2588: 2D 
9570:80 
B578:88 
BSAB:CE ({ 
B5A8:D8 
B5Bd: AE 
05B8:3D 
BSCH: AZ 
SCH: 3B 
B5D9: 48 
3S5D8:20 
BSEO: 27 
DSEB: 970 
S5F0: 209 
DSF8: 8% 
DER: EN 
Bad: 
Bali: BE 
9518: 0A 


D5270:3D 
0528: 3A 
2530: AD 
0638: AD 
0540:60 
0543:90 
0550:80 
0658: 3A 
BR: 
Dh 
2670:58 
B&7B:BB 
DB: 2 
0598:80 
DBarm:l 
0578: 76 
DAAD: AD 
B5AB:A2 
B&BR: AD 
06B8:80 
Bach: SF 
25CB: AD 
23409:80 
B&D8:8D 
BAER: 58 
B&EB: 208 
BAFO:AS 
O4FB:89 
2D739:70 
2788: 5B 
D0710:3D 
A71B: +4 
0720:04 
B7ZB:FB 
0730:58 
9738: AD 
D74Q:1D 
9748:80 
B7SG:EE 
29753:48 
D75B:5D 
2B7&58:80 
2770: 7C 
07728:50 
Hr’En: 2a 
2788:CB 
R7FN:CE 
2B7F8:AE 
B7’RAD: IE 
ara: 07 


Lösche Teil: Damit läßtsich ein beliebig langer Block von 
Zeichen aus dem Zeichensatz löschen. Mit der Codezahl 
werden das erste und das letzte zu löschende Zeichen aus- 
gewählt. 

Lade Teil: Aus einem auf der Diskette vorhandenem Zei- 
chensatz wird ein beliebig langer Teil in den gerade bear- 
beiteten Zeichensatz geladen. Das erste und das letzte zu 
ladende Zeichen wird über die Codezahl ausgewählt. 

LIST: Mit diesem Befehl läßt sich ein beliebiger Teil aus 
einem Zeichensatz in ein Basic-Programm einbauen. Das 
Programm fragt dann, an welcher Speicherseite es stehen 
soll (siehe auch Beitrag »Die Handschrift des Computers« 
in diesem Heft). Dann wird nach dem ersten und letzten zu 
übertragenden Zeichen gefragt. Wollen Sie den gesamten 
Zeichensatz übertragen, so geben Sie O0 und 127 ein. 
Anschließend folgt die Frage, ob ein zweiter Block mit Zei- 
chen gespeichert werden soll. Diese beantwortet man mit 
»ja«, indem man den Joystickknopf drückt, oder mit »nein«, 
indem man den Joystick hinauf oder hinunter bewegt. 
Dann folgt die Frage nach der ersten Zeilennummer im Pro- 
gramm sowie nach der Schrittweite der Nummern. Zuletzt 
fragt das Programm nach dem Namen, den es dem File 
geben soll. Auf der Diskette wird dann ein ASCII-File unter 
dem angegebenen Namen gespeichert. Dieses wird mit 
dem »ENTER«-Beiehl in ein Basic-Programm eingebun- 
den. Das auf der Diskette erzeugte File enthält gleichzeitig 
ein Ladeprogramm, das den Zeichensatz unter Basic 
installiert. 

Farben verändert die gerade ausgewählte Farbe. 

Ein Zeichen editiert man, indem man mit dem Cursor ins 
Zeichenfenster fährt und dort durch Druck auf den Joy- 


S wsTer. 
Esmelren 





g7Ba: 8A. 
B7EB:ED 
2D7CB: AD 
B7CB:8D 
27D2:3E 
D7D8S: 4E 
B7EB:50 
D7EB: 78 
D7FO:38 
2B7FS:05 
BBERB:EC 
Ba08:F3A 
381: 
2818: 2A 
0970:58 
89828: BE 
2830:809 
0938: 58 
2840:588 
0848:80 
28950: 88 
0858: B1 
2858: 18 
0858:355 
2978:728 
0878:29 
2998:7538 
2888: 0A 
B879:50 
2978:208 
BEAB: Di 
BaAg: 50 
BSBA: CC 
88B8: 53 
DBScH: DE 
BSCHB: CD 
2B8D8: CA 
DBBDB: 40 
2DSEB: BO 
OBEB: DO 
DBSFB: 09 
DBF8:00 
A702: 00 


Listing. »CHAR.OBJ« wird vom 
Char-Maker benötigt. Bitte mit 
AMPEL eingeben. 





stickknopf Punkte setzt oder löscht. Ein Zeichen läßt sich 
zusätzlich auswählen, indem Sie mit dem Cursor auf die 
Codezahlfahren und den Knopf drücken. Sie erhalten dann 
die gleiche Funktion wie beim Menüpunkt »Eingabe«. 
Tritt beim Laden oder Speichern auf Diskette ein Fehler 
auf, so wird die Fehlernummer unter den Menüpunkten 
gezeigt. Um mit dem Programm fortzufahren, müssen Sie 
dann den Joystickknopf drücken. (Thomas Richter/hf) 



















Datenträger: 





2 DPOKE 566 ,DPEEK (528) 

5 TRAP S:CLOSE #1:DPEN #1,4,8,"D:CHARS.O 
BJ":CLOSE #1 

18 GRAPHICS B:POKE 559,0: DLO=DPEEK (568): 
PAUSE 8: COL=$8097B 

15 POKE COL,@:POKE COL+1,i@:POKE COL+2,8 
:POKE COL+4,8 

28 BLOAD "D:CHARS.OBJ":POKE 559,34 

3@ POKE s8858,sA2:POKE SAQRQ,2:MOVE SABO 


Or> 
„OH?> 


<HB> 


Listing. »CHAR.BAS«, bitte mit Prüfsummer eingeben 








B,2ABB1 ,$B3SFF 

42 U=USR ($8880) : MCO=3: GRAF=B: AS=I32: POKE 
795,$32:POKE 711,8:POKE 786,376: POKE 797 
„siA \ 

58 POKE 754,#CC:SETCOLOR 9,8,6:SETCOLOR 
4,8,8:DIM F#(20) ,„FI$t{28) ,„H#(498) „AN(16) ,E 
N(16) „ANAD(16) „ENAD (16) 

&0 EXEC MENUE:YA=-1:EXEC GR@O 

65 —- 

72 X=PEEK (#89353) : Y=PEEK (#9034) : XH=11+18* 
(X>28) :POKE 77,8 

Ba IF X<S AND Y<B THEN 560# ZEEID 

8sı IF Y=7 AND X>=5 AND X<=7 THEN X=11:Y- 
2:60T0 128 

98 IF (Y<2 OR Y>ı1) OR tkX<11 OR (X>2%4 AN 
D X<29)) THEN IF YA>B:U=USR (5815, XA,YA, 
11+5%# (XA{29)):YA=-1:ENDIF :GOTO 118 

1ia@ IF Y<>YA AND YA>-i THEN U=USR (#8015, 
XH,YA,11+5*# (XA<29) ) sU=USR ($98015,XH,Y,11+ 
S# (XH£29)) 2 XA=XH: Ya=Yy 

1B1 IF Y<>YA AND YA=-1 THEN U=USR ($8215, 
XH,„Y„11+5# (XH<29) ) 2 YA=Yı XA=XH 

i1®B IF PEEK{s$SDRIF)=5 AND STICK(O)=15 THE 
N EXEC FARBUM 

ı2@9 IF STRIG(B)=1 THEN 79 

122 IF (X>=1 AND X<=4) AND (Yr=il AND 
=14) THEN MCO=Y-11:EXEC GONG: IF GRÄAF<12: 
MCO=3#MCO:ENDIF :EXEC PARAM:GOTO 78 

125 IF (YX2 OR Y>11) OR (X<11 OR (X>2%& A 
ND X<29))} THEN EXEC GONG:GOTO 78 

138 MN=(Y-2)+10*(X>28) +1: PAUSE B:EXEC GO 
NG 

135 IF STICK(B)<15 THEN 78 

142 ON MN EXEC EIN,NAE,LOE,KOP,ALO,INE,S 
TA,BSA,BLO„DIR,„SPI,INV,VER,SRQ,„GR1,6RZ2,D 
RE,PRO,LIS,END 

ı58 POKE 77,8: PAUSE 5:60T0 78 

151 — 

152 # NEWPO: U=USR (#83015,XA,YA,11+5# (XA<2 
9)):XHN=11+18#* (XN>28) =» U=SUSR ($9815,XHN,YN 
„11+5# (XHN<29)):G0TO 78 

155 — 

160 # ZEEID:XA=-1:YA=—1 

170 PAUSE 1:X=PEEK ($83033) : Y=PEEK ($88534) 
188 IF X>7 OR Y>7 THEN Yä=-1:60T0 78 

135 IF STICK(B)=15 AND PEEKt$DBIF)=5 THE 
N EXEC FARBUM 

178 IF STRIG(B)=1 THEN 178 

195 BW=MCO: IF GRAF<{>12 AND MCO=3 THEN BW 
=1 

19& IF GRAF=12 THEN U=USR ($8996,AS, (7-X) 
-1,Y,BW) :GOTO 218 

ZB2 U=USR (89085 ,AS,7-X,Y,BW) 


212 U=USR(#8083,A5):POKE #DB1F,0:XA=k: YA 


=Yy 
220 GOTO 178 

999 —— 

189@ PROC MENUE:POKE 752,1:POKE 82,8:POK 
E 835,39:POKE 87,0:? "{ESC CTL <}"z3=:POSIT 


ION 8,2 

1B1@ ? "1._.von„THOR-Software. (c},.19795/87 
3 

ı1B28 ?7 "2" 

1058 ? "S_„.Eingabessii.,.,.,.,,,,Spiegeln" 

10409 7 "444N{CTL Kıchstes.Zeichen„.inver 

s" 

1058 ? "S..L{ICTL OD’scheii.Zeichen.„Versc 

hieben"; 


18508 7 "ö&s.Kopiere,„„Zeichen„„Graphics.29" 
187B ? "TisiL{CcTL O}schesalles.....,.Graph 
Ics“l" 

1080 ?” "BııIntern. „Zeichenssaßbraphics.i12 
1298 FOSITION Q0,86:7 "87854321..,.5tandart 
zeichen„„AL{CTL O’sche_Teil";z 

1120 7? "aaa BSAVEnu 21 1 1 2. 2 2222 ,.L2ade,Teil" 
1110 ?7 "2,.BLDADL2LL.. 22 snaa LIST" 

1120 7 "ss.Directoryssssasssa Farben" 
1121 POSITION Q,14:7* " 
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1130 EXEC PARAM:ENDPRIC 
1148 FROC PARAM:FOR I=11 TO 14:POSITION 
ee ie "anna": NEXT I 


1158 POSITION B,9:?7 "Code: "5; :VL=AS:EXEC 
PRIN 
1159 POSITION 8B,15:? "Modus: ";GRAF;"."3 


117® POSITION 18,14:? "-KeinesFehler-" 
1180 IF GRAF=8 OR GRAF=1 

1198 POSITION 4,i11+(MC0=3):? "IESC ESCHt 
ESC CTL +3"; | 

1200 ELSE :POSITION 2,11+MC0:? "<ESC ESC 
>{ESC CTL +3"z;:ENDIF 

1218 ENDPROC 

1228 PROC PRIN: H$="Ba@" 

1239 FS=STR$ (VL) cHSCA-LEN(FE))=F$:? Hy: 
ENDPROC 


1248 PROC FARBUM:IF GRAF=B OR GRAF=1 
1258 POSITION 4,11+(MCO=3):?7 "."; 

1268 ELSE :POSITION 2,11+MC0:? ""::ENDI 
F 

1278 MCO=MCO+1+2%* (GRAF< >12) 

1238 IF MCO>S THEN MCO=8 

1298 EXEC PARAM:EXEC GONG:ENDPROC 

130D PROC GONG:FOR I=15 TO 8 STEP -1:50U 


ND 8,129,1@,1:SOUND 1,121,1@,1I:PAUSE @:N 
EXT I:ENDPROC 

1518 PROC PLOF:POKE #88535,1:POKE 535248,08 
» ENDFROC 

1328 PROC PLON:FOKE #39035,8:ENDPROC 

1350 PROC SHURE 

1542 SOUND 9,58,18,18:REFEAT =:UNTIL STRI 
G(B’=1 

1558 POSITION 11,17:? "Ganzısicher? (Feue 
rknopf !')"s: YE=B: PAUSE 3 

1558 FOR I=18 TO 8 STEF -B.2 

137@ SOUND 2,144,18,1:SOUND 1,145,19,1 
13558 IF STRIG(B)=0O THEN YE=1:EXIT 

1350 IF STICK(B)<>15 THEN EXIT 

14820 PAUSE B:NEXT I:50UND 23,9,20,0: SOUND 
1,0,9,0 

1485 REFEAT :UNTIL STRIG (83 =1 


1418 POSITION 8,17:7 "XESE SHIFT >34{ESC ° 


SHIFT DEL}{TESC SHIFT DEL’";:IF YE=-B THEN 
PDF :FOP :560T0 79 

14209 ENDFROC 

1430 PROC BISKIN:DPOKE 558,DLO: FOKE #D48 

E,F40:5ETCODLOR 4,3,4:SETCOLOR 2,0,12:SET 

COLOR 1,9,8 


1458 POKE 82,8:POSITION 8,17 
1470 ? "ammasDiskettenzugriff!'„Bitte,_." 


1458 
1508 


? "as. .einen,Augenblick„Geduld.„!" 

FOKE 82,8:POSITION 8,2:EXEC PLOF 
151B ENDPROC 

1528 FROC DISEKOU: U=SUSR (FEOBB) : EXEC PLODN: 

SETCOLOR 4,8,8:SETCOLOR 9,8,6 | 
1521 POSITION 8,18:? "XESC SHIFT >»I{ESC 

SHIFT BEL}<ESC SHIFT DEL>TESC SHIFT DELL} 
{iESC SHIFT DEL>{TESC SHIFT DEL+TESC SHIFT 
DEL?TESCE SHIFT DELITESC SHIFT DELF",:U= 
USR {F880853 ,AS) : ENDPROC 

1538 PROC FILEIN:POKE 752,8 

1548 TRAP 1548:POSITION 8,17:? "<ESC SHI 

FT >3{ESC SHIFT DELFTESC SHIFT BEULY": 
1558 FOSITION 11,17:?7 "FilenamesDi:"; 
1558 INPUT "{iESC CTL *3C<ESC CTL +5",Fr:F 
I="D:":FI#F(3)=FF:POSITION 8,17:?7 "XESC 

SHIFT >+{tESC SHIFT DEL>Y{ESC SHIFT DELY"; 
:TRAF 3BBBB: FOKE 752,1:?7 "XESC CTL #HI<CES 

E ETL +"; :ENDPROC 

1578 PROC BEGENI: ASS=AS 

1588 POSITION 11,17:”? "Erstes..IZeichen" 
1578 EXEC EIN: AN=AS 

1588 POSITION 11,17:? "Letztes,.Zeichen" 
1818 EXEC EIN: EN=AS: AS=ASS: POSITION 5,9%: 

WL=AS:EXEC PRIN 

158280 ANAD=USR (#8818,AN) : ANI=PEEK (2989) 
1558 ENÄAD=USR ($89018,EN? :ENI=FEEK (209) 
1548 FOSITION 11,17:7 "XESC SHIFT >F{ESC 
SHIFT DEL3TESC SHIFT DELY"3 ENDPROC 

2808 FROC EIN:EXEC PFLOF 

2010 H#=STRE(ASI:X=7:FI$="ORR":FIS(A—-LEN 








(H£))=H$:PAUSE 2 

2828 PAUSE 2:ST=STICK (B) zW=ASC(FIH(CX-4)) 
-48:S0OUND 0,8,29,0 

2838 IF ST=11 AND X>5 THEN X=X-1:W=ASC(F 
I$(X-A))-48 

2848 IF ST=7 AND X<7 THEN X=X+1:W=ASC (FI 
£(X-4))-48 

2250 IF ST=13 THEN W=W-1:IF W=-i THEN W= 
9 


2258 IF ST=14 THEN W=eW+1:IF W=1B THEN W= 
I) 

2870 FIE(X-4,X-4)=CHR$ (W+48) : POSITION 5, 
2:7 FIF 

2058 POSITION X-1,18:?7 "{TESC ESCHTESC C 
TL -32"s:1F ST<>15 THEN SOUND 9,59,18,10 
2278 IF STRIG(DI=1i THEN 20209 

2871 AS=WALIFISI:IF AS>127 THEN EXEC GON 
G:GOTD 2928 

2122 U=USR (8895 ,AS) :VL=AS: POSITION 5,18 
:? "22..." :50UND 98,8,98,8:EXEC PLON: ENDPR 
DC 

2118 PROC NAE:AS=AS+1: IF AS=128 THEN AS= 
1%) 

2128 U=USR (58883,A5}: POSITION 5,9: VL=AS: 
EXEC FRIN:ENDPROC 

21538 PROC LOE:EXEC SHURE 

2148 U=USR (8818,45) 

2158 FOR I=U TOD U+7:POKE I,„B:NEXT I:U=US 
R($88383,AS) :ENDPROC 

21&8 PROC KOP=:POSITION 11,17:7 "Welches, 
Zeichen.”?" 

2170 ASS=AS:EXEC EIN 

2158 U=USR (#8218,ASS) :V=USR($8018,AS) 
2178 MOVE V,U,8: AS=ASS:U=USR ($8885 ,AS}:P 
OSITION 8B,17:?7 "{iESC SHIFT >FI{ESC SHIFT 
DEL}TESC SHIFT DEL}"s: POSITION 5,9: VL=AS 
:EXEC PRIN:ENDPROC 

2288 FROC ALO:EXEC SHURE:FOKE SABBB,8:MO 
VE $ABBR „FABBI „FBuIFF 

2218 U=USR (538983 ,AS) : ENDPROC 

2228 PROC INE:EXEC SHURE: U=USR (#F8Q1B „CC 
I ı U=USR (88235, AS} :ENDPROC 

2258 PROC STA:EXEC SHURE: U=USR (#8901B,$EQ 
I : U=USR (8985, AS} TENDPROC 

2248 PROC BSA:EXEC FILEIN:POKE 752,82 
2258 TRAP 2258: POSITION 98,17:7 "{ESC SHI 
FT >+{ESC SHIFT DELFTESE SHIFT DEL}+"; 
2268 POSITION 11,17:7 "Inswelche,Page?,.9 
siESC CTL +7£ESC CTL +3"; 

2278 INPUT "TESE CTL #3{ESC ETL +7",P6G:P 
OKE 752,1 

2288 POSITION 8,17:?7 "x<ESC SHIFT >}{ESC 
SHIFT DEL}{ESC SHIFT DELY";3 

22978 EXEC DISKIN 

2528 TRAP #ERRO:DPEN #2,8,80,FI$ 

231B PUT #2,*#FF,#FF,„B,P&G,SFF,„PG+3 

2328 BPUT #2,FABGQ „2408 

2358 CLOSE #2:EXEC DISKOU: TRAP 48898: END 


2348 PROC BLO:EXEC FILEIN 

2358 EXEC DISKIN: TRAF #ERRO 

2360 DPEN #2,4,B,FI$:GET #2,A,A 

2378 IF AtA<>518 THEN 2400 

2338 GET #2,A,A,A,A 

2370 BGEET #2, FA200 „2400 

24090 CLOSE #2:TRAPF 48080: EXEC DISKOU: U=U 
SR (FE885 ,AS) :ENDPROC 

2588 # ERRO:TRAP #ERRO:CLOSE #2:EXEC DIS 
KOU 

2518 SOUND 8,12,12,15:50UND 1,15,12,15 
2528 PAUSE 48:5ODUND 98,8,0,8:SOUND 1,8,0, 
®: POSITION 10,142? "sErrora-a"sERRS Tu. 
25358 REPEAT :UNTIL STRIG(O)=B 

2548 POSITION 10, 14:7? "i,..-Keine,„Fehler 
-"::FOP :POP :6G0T0D 78 

2552 FROC DIR:EXEC DISKIN 

2560 TRAP #ERRO:OPEN #2,6,0,"D:*.*" 

2578 TRAP 2528:C=8:POKE 82,8:7 "TESC CTL 
 *}{ESC CTL +3"3:BI=DPEEK (88) 

2558 FOR I=8 TO 1i1:AD=BI+I*498+8:POKE AD, 








B:MOVE AD,AD+1,31:NEXT I:FOR I=498 TO 697 
S:POKE I,255:NEXT I 

2595 POKE 73,8: E=1 

25978 TRAP 2620: INPUT #2,F#£:FIs="":IF F&$t 
2, 23<>"_." THEN E=B 

25971 TRAP 2592: INPUT #2,FIS 

25972 IF F£(i2,2)="." THEN F#$=F#(5) 

25753 IF FI$<>"" THEN IF FI$(2,2)="_":FI$ 
=FI£(3):ELSE :POSITION 8,7:?7 "XESC SHIFT 
DEL}":E=B:ENDIF 

258808 POSITION 8,C:? F#; "2"; FI$s:C=C+1:If 
E>=7 AND E THEN EXEC WTFE:C=9:6G0T0 2589 
2518 GOTO 2578 

2828 TRAF 4BB08: EXEC WTIFK:EXEC DISKOU:EX 
EC MENUE:CLOSE #2: YA=-1:ENDPROC 

2658 PROC WTFE:EXEC DISKOU:POSITION 2,17 
:? "Bittesausw{CTL K’ihlen.oder „START.dr{ 
CTL J3cken'!"s:EXEC DISKCHOI 

25409 REPEAT :UNTIL PEEK(FDBIF)I=7:POSITIO 
N 2,17:7 "<XESC SHIFT >3#ESC SHIFT DEL+Y{E 

SE SHIFT DEL}TESC SHIFT >3"3:EXEC DISKIN 
:ENDFPROC 

26858 PROC SPI:POSITION 11,17:EXEC PLOF 
2468 ? "Spiegeln: „{ESC ESCYHIESC CTL -}tE 

SC ESCHTESEC ETL =7":5P=8 

2578 ST=STICK (8) E 

25858 IF 5T=153 OR ST=-14 THEN SP=8: FPOSITIO 
N 21,177? "{ESC ESE}ZTESE CTL —{ESE ESsc} 
<ESC CTL =+"ıEXEC GONG 

2870 IF ST=7 OR ST=1il THEN SP=1:POSITION 
21,17:?7? "<ESC ESCHIESC CTL +H{ESC ESC}Hı 
ESC CTL #H":EXEC GONG 

2782 IF STRIG(8)=1 THEN 2578 

2718 IF SP=1 THEN 2758 

2728 U=USR ($3818,A5):MOVE U,$2482,8: FOR 
I=9 TO 7:POKE U+I,„PEEK (#9580+(7-I)): NEXT 
I 

2732 U=USR (9883 ,AS)I:60T0 27689 

2758 U=USR (#8BGC „AS) : U=USR (580853, AS) 

2788 EXEC FLON:FOSITION 8,17:? "{ESC SHI 

FT >F7XESC SHIFT DELYTESC SHIFT DEL}"::EN 
DPROE 

2778 FROC INV:U=USR ($BBRF „AS) : U=USR (#808 
3,AS}) :ENDPROC 

2799 FRÜC VER:SP=B:EXEC PLOF 

2778 FOSITION 11,17:? "Verschieben: „TESC 
ESCH{ESECE CTL _yn 

2888 ST=STICK (8) 

2818 IF ST=1i4 THEN 5P=B:FOSITION 24,17:”? 
"XESC ESCHIESC ECTL -I":EXEC GONG 

2811 IF ST=13 THEN SF=1:POSITION 24,17:? 
"ZESC ESCHIESC ETL =SYI":EXEC GONG 

2828 IF ST=7 THEN SP=2:POSITION 24,17:? 
"KESCE ESCHHESC CTL #HH":EXEC GONG 

2821 IF ST=11 THEN SP=3:POSITIDON 24,17:7 
"LIEST ESCHTESE ECTL +r":EXEC GONG 

2838 IF STRIG{B)=1 THEN 2888 

2848 POSITION 8,17:?7 "{ESC SHIFT >+{ESC 

SHIFT DEL}Y{ESC SHIFT DELY"; 

2858 POSITION 11,17:?7 "Wie.oft_?ı1":0FT= 

4 

2880 PAUSE 3:S5T=STICK (8) :SOUND 90,0,0,8 

2870 IF ST=13 AND DOFT>1 THEN OFT= OFT-1 

2888 IF ST=14 AND OFT<7 THEN OFT=OFT+1 

2878 IF ST<>15 THEN SOUND 90,58,129,18 

2900 POSITION 21,17:? CHR&{(OFT+48) 3; 

2918 IF STRIG(CO)=1 THEN 2858 

2928 ON SP+1 EXEC UP,DO,LR,LR 

2938 U=USR (F8R8I3 ,ASI:EXEC PLON:POSITION 

Q3,17:7 "XESECE SHIFT >3{ESC SHIFT BEL} Z{ESC 
SHIFT DEL}"3 :ENDPROC 

2748 FROC UP: U=SUSR (#8818,AS): FOR I=i TO 

DOFT:A=PEEK(U}:=:MOVE Ur1,U,7:POKE U+7, nie 
x£T I=ENDPROC 

2958 FROC DO: U=SUSR(F8B18,AS): FOR I=1 TO 

OFT 

2950 A=PEEK (U+7}2—-MOVE U,U+1,7:POKE U,A: 

NEXT I:ENDPROC 


Listing. »+CHAR.BAS« (Fortsetzung) 
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29778 FROC LR:SW=1 

2788 IF SP=3 THEN SW=B 

2998 U=USR ($8912,AS,SW,OFT)} :ENDPROC 

SaRE PROC GREY 

5210 U=USR (+8889,2):FOKE #828358,8:6GRAF=B: 

POKE COL+1,PEEKt7O7):POKE COL+2,FEEK(FII 
):POKE CTOL+4,PEEK (711) 

3315 EXEC ELFAU:ENDPROC 

s>sa28B PROC GRI 

S2AI2 U=USR (F8B09 ,6):POKE 5958,08: 5RAF=1 

s84B FOR I=COL TO COL+35:FOKE I„PEEK (727) 
NEXT I:POKE COL+4,PEEK(FII}:EXEC CLFAU: 

ENDPRIC 

saS8 PROC GR2 

SBER U=USR(#F8009,4):POKE #3855,1:6RAF=12 

32790 FOR I=8 TO 2:FOKE COL+I,PEEK(7OS+HI) 
:NEXT I:POKE COL+3,F68:POKE COL+4,PEEK(7 
illzEXEECE CLFAU 

3071 FOKE 89849 , 255: ENDPROC 

Ssas08 PROC CLFÄU: U=USR (FEB) 

SE97B FOR I=11 TO 14 

180 IF I<13 THEN POSITION 4,1:?7 "."; 

si1@ POSITION 2,1I:? "."; 

3128 NEXT I: IF (MCO=1 OR MCO=2) AND GRAF 

<>12 THEN MCO=3 

s13B EXEC PARAM: PAUSE B:U=USR (#9983,AS}: 
PAUSE R:ENDFROC 

3148 PROC DRE 

31580 EXEC SHURE:EXEC BEGENI 

3158 FOKE ANAD,B:MOVE ANAD„ANAD+1, (ENAD- 
ANADY—-1+7: U=USR (8085 „, AS) :rENDPROC 

s170 PROC FRO:EXEC BEGENI:EXEC FILEIN 
3188 EXEC DISKIN:TRAP #ERRO 

s1sG OPEN #2,4,0,FI# 

3200 GET #2,A,„B:IF ArB<>518 THEN 3508 
3218 GET #2,A,B,C,D 

3220 BGET #2,$A800,+0422 

3230 MOVE ANAD+$OBBU ,ANAD ,ENAD-ANAD+7 

5560 CLOSE #Z:EXEC DISKOU 

3318 TRAP 40889: U=USR (999853, AS5S) :ENDPROC 

3328 FROC LIS 

3330 POKE 752,8:PFOSITION 8,17:?7 "{iESC SH 
IFT >3{ESC SHIFT DEL>TESC SHIFT DEL}Y";:P 
OSITION 11,17:? "Abawelcher„Fage?,F5{ESC 
ETL +31ESCE ETL +3"; 

3348 TRAP 33350: INPUT "{ESC CTL #7{ESC CT 
L +3",BEG 

35358 BEAD=-BEG#+256: FOKE 752,1:7 "{ESC CTL 
#=}4ESC CTL +3"z5ıK=2 - 

S340 POSITION 8,17:7 "XESC SHIFT FItESC 
SHIFT DEL}+TESC SHIFT DEL}Y"::TRAP 48000 
3365 IF PEEK($DUIFI=& THEN ANAD (K-2)=32: 
ENAD{K-2)3=127:G0T0 3418 

5378 EXEC BEGENTI: ANAD(K-2) =ANAD: ENAD (K-Z 
I=ENAD: AN CK-ZI=ANI:ENCK-2I=ENT: IF ENAD<SA 
NAD THEN 3578 

3588 POSITION 8,17:7 "{ESC SHIFT >I{IESC 
SHIFT DEL>ZESC SHIFT DECH";: POSITION @,1 

7:7? K; "ten„ElockJeingeben? (Knopf=ja,{ESC 
ESCHIESC ETL -ITESC ESCHLESC CTL =7=nei 

n)"ss:EXEC PLOF 

s3P2 IF STRIG(BI=D AND K<18 THEN Kek+1:6 

DTO 3558 

Ss40B IF STICK(B)=15 AND K<13 THEN 33708 

Ss#18 FOSITION B,17:”?7 "{ESC SHIFT >>+4{ESC 
SHIFT DEL+{ESC SHIFT DEL}"4:TRAP 3410: PO 

KkKE 752,8 

s422@ POSITION 11,17:?7 "Startzeilennummer 
"szINPLUT "XESC CTL #»7{ESE CTL +H",„ZN 
34538 TRAP 3438: POSITION 8,17:? "<ESC SHI 

FT >3£ESC SHIFT BDELYTESC SHIFT DEL>Y"; 
Ss442 FOSITION 11,17:? "Schrittweite:1Bß{E 

SC ETL +3ZESC CTL +3"; 

s4Sg INPUT "£ESC CTL #3#ESC ECTL +3",Z5:T 

RAP 409008 

S4508 EXEC FILEIN 

5478 EXEC DISKIN: TRAP #ERRO 

s#+5B OPEN #2,8,0,FI= 

S470 7 #25 ZU; "BA="5 BEAD; ":RESTORE" 3 ZN: Z0O 

=ZIN:EXEC INC 

3500 7 #2; ZN; "READ.A: IFAAXDBLTHEN. "5 Z0+Z5 
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*3:EXEC INC 

3siqd 7 #23 ZN; "POKELAD „A: AD=AD+1:50TD.";2Z 
O+ZS:EXEC INC 

3320 7? #25 ZN; "IF2A=-1BB8.THEN-RETURN"SEX 
EC INC 

3530 ? #25 ZN; "AD=BA+8#INT (ABS (A)):GOTO"; 
ZO+rZS: EXEC INC 

s348 FOR J=2 TO K 

3558 ? #25 ZN; "DATA" AN(J-2)5". I "SEXEC 


3568 AD=ANAD(J-2) FOR L=AN(I-2) TO EN(I- 


3570 ? #25 ZN; "DATA";:EXEC INC 

3588 FOR I=8 TO 7 

35908 ? #2; PEEK (AD) ; :AD=AD+1 

3688 IF I<7 THEN ? #25","3 

3618 IF I=7 THEN ? #2 

3628 NEXT I:NEXT L:NEXT J 

3625 ? #2; ZN; "DATA.-1800" 

3638 CLOSE #2:EXEC DISKOU:TRAP 42008: END 


35648 PROC INC: ZN=ZN+ZS: ENDPROC 

3658 PROC END:POSITION 11,17 

3650 ? "Helligkeit: {ESC ESCHESC CTL -H 
ESEC ESCHIESC CTL =}ıFarbe: {ESC ESCHLESC 

ETL +3{ESC ESCHLESC CTL #+" 

36478 IF MCO=89 THEN REG=COL-2 

35488 IF MCO>B AND GRAF=12 THEN REG=7B4+M 
co 

36928 IF MCO>2 AND GRAF<>I1Z2 THEN REG=787 

3780 EXEC PLOF 

3718 W=PEEK (REG) 

3728 PAUSE 2:5T=STICK (8) 

3738 IF ST&1=8 AND {W MOD 16)>9 THEN W=W 


5748 IF ST&2=2 AND (W MOD 16)<15 THEN W= 


37508 IF ST&4=@ THEN W=W-1i&:IF WEB THEN W 

=W+25& 

3768 IF ST&B=8 THEN W=W+1&: IF W>255 THEN 
=W-258 

3778 POKE REG,W 

3788 IF STRIG(@B)=i1 THEN 3728 

3798 IF REG=COL-2 THEN POKE 711,W 

3888 IF GRAF=12 THEN EXEC GR2 

39312 IF GRAF=D THEN EXEC GRO 

3820 IF GRAF=1 THEN EXEC GRi 

3832 POSITION 8,17:? "{ESC SHIFT >3{ESC 

SHIFT DEL}{ESC SHIFT DEL}"z:EXEC PLONZEN 

DPROICT 

39848 PROC DISKCHOIL: YA=-1:BI=DPEEK (88) 

385@ IF PEEK($SDAIF)=& THEN ENDPROC 

39855 IF STRIG(B)=8 THEN IF H=@ AND STICK 

(B)=15 AND NOT (X<B OR Y>& OR (X>i8 AND 

X<24) OR X>34) .THEN 3928 


38362 X=PEEK ($8833) : Y=PEEK ($8834) 


3855 H=B: XH=8+18*# (X >23) :W= (PEEK (XH+HABHY + 
BIY)%127:IF WISS OR W>57 THEN H=i1 

5878 IF X<B OR Y>ö OR (k>1B8 AND X<Z4) OR 
H OR X>34 THEN IF Ya>=B:U=USR ($5815,XA, 
YA,li):YA=-1:ENDIF :60T0 3558 

S8s88 IF XA=XH AND Y=YA THEN 38598 

Ss8F20 IF YAa>=B THEN U=SUSR (8015, XA,YA,i11) 
>28 XA=XH: Ya=Y:U=SUSR (F8B15, AA, YA,11) 
5718 IF STRIG(B)=1 THEN 3858 

SP28 FIS=s"„aaaaaaaaa" 

3738 BD=BI+XH+Y*408 

3948 MOVE BD,ADR{FIS) ‚11 

3958 BD=ADR({iFIE):FOR I=BD TO BD+il 

3758 W=PEER (I): W=eclWERL1ZFI +SZ: FOKE I,W 

39778 NEXT I 

s988 FOR I=1 TDS8 

s9978 IF FISCI,„EI="," THEN EXIT 

4200 NEXT I 

4a10 F#(1,I-1)=FI#:F#(1,I)=".":F&(I+Hi)=F 
I#F(?,113:CLOSE #2 

4228 EXEC GONG:FIS="D: ":FISt3)=FF:POF :P 

OF :EXEC MENUE: YA=-1:50T0 23582 


Listing. »CHAR.BAS« (Schluß) 














Viele Firmen bringen Malprogramme auf den 
Markt, die sich nur in wenigen Details voneinan- 
der unterscheiden. Unser Malprogramm »Grafik- 
Draw« vereint viele Funktionen und besticht mit 
seinen vielfältigen Grafikstufen. 


| alprogramme für dıe Atari 8-Bit-Computer sind 
M genügend im Ängebot. Von Datasoft gibt es den 
| »Micropainter«, Atari und Koala-Soft haben das 
»Atari-Artist«-Programm beziehungsweise den »Koala- 
Painter«herausgebracht, und ein weiteres amerikanisches 
Programm namens »Fun with Art« schaltet auf Wunsch in 
jeder Zeile über einen Display-List-Interrupt die Farben um. 
Ganz zu schweigen von den vielen anderen Malprogram- 
men.kleinerer Softwarefirmen. Warum sollte man also ein 
weiteres derartiges Programm veröffentlichen? 

Zum einen haben die professionellen Programme den 
Nachteil, daß sie nur für viel Geld zu bekommen sind. Zum 
anderen unterstützen sie nicht die vielfältigen Grafikstufen 
der XU/XE-Computer. Grund genug, ein Programm zu ver- 
öffentlichen, das die meisten Grafikstufen berücksichtigt, 
eine umfangreiche Bibliothek an Malfunktionen besitzt, 
sowie obendrein noch eine Hardcopy-Routine aufweist, mit 
der ein Bild bequem und schnell auf einem CP-80-Drucker 
von Seikosha ausgedruckt wird. Wenn Sie nur eine Zeile im 
Programm ändern, arbeitet es auch mit anderen Druckern 
zusammen. 

Das Programm »Grafik-Draw« besteht insgesamt aus 
drei Listings. Listing 1 ist das eigentliche Malprogramm. 
Programmteile, die zeitkritische Aufgaben übernehmen 
(Listing 2 und 3), sind in Maschinensprache programmiert 
und werden vom Hauptprogramm nach dessen Start von 
der Diskette dazugeladen. Diese Listings müssen mit dem 
AMPEL-Programm eingegeben und unter den Namen 
»UPADSTK.BIN« und »UKIPDRK.BIN« auf der gleichen 
Diskette wie das Hauptprogramm gespeichert werden. 

Nach dem Start von Grafik-Draw erscheint auf dem Bild- 
schirm das Hauptmenü. Der leuchtende Balken wählt die 
einzelnen Menüpunkte aus. Er wird miteinem Joystick oder 
einem Grafik-Tablett wie der Atari-Maltafel bewegt, die in 
Port 1 anzuschließen sind. Um zwischen dem Joystick oder 
der Maltafel als Eingabemedium zu entscheiden, gehtman 
auf den Menüpunkt »Zeichengerät« und schaltet dann auf 
Knopfdruck zwischen den beiden Eingabegeräten hin und 
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Ein toller Malkasten 


her. Das gerade gültige Zeichengerät wird rechts neben 
dem Menüpunkt angezeigt. 

Das Programm stellt elf Zeichen sowie sechs weitere 
Funktionen zur Verfügung. Wurde eine Zeichenfunktion 
angewählt, so schaltet der Computer vom Menü zum 
gezeichneten Bild. Dort wird mit der Taste <F> die Mal- 
farbe festgelegt. Zurück ins Menü kommt man mit der 
< SPACE > -Taste. Folgende Zeichenfunktionen stehen zur 
Auswahl: 


Zeichnen: Freihändiges Zeichnen wird mit dieser Funk- 
tion unterstützt. Die Linie auf dem Bildschirm folgt direkt 
dem Fadenkreuz. 

Linie: Beim ersten Druck auf den Joystick/Touch-Tablet- 
Knopf wird der Anfangspunkt, mit dem zweiten Knopfdruck 
der Endpunkt einer zu ziehenden Linie festgelegt. 

Linie folgend: Wie »Linie«, nur daß der Endpunkt einer 
ersten Linie zugleich der Anfangspunkt einer zweiten Linie 
ist. Ä 

Kreis: Der erste Knopfdruck legt den Mittelpunkt eines 
zu zeichnenden Kreises fest. Durch Bewegen des Faden- 
kreuzes bestimmt man den Durchmesser des Kreises. 

Ellipse: Wie Kreis, nur daß hierbei eine Ellipse gezeich- 
net wird, die in der Horizontalen und Vertikalen unter- 
schiedliche Ausdehnungen hat. 

Rechteck: Der erste Knopfdruck bestimmt den obersten 
linken Eckpunkt eines Rechtecks, der zweite Knopfdruck 
den untersten rechten Eckpunkt. Durch diese beiden 
Punkte wird ein Rechteck gezeichnet. 

Rechteck gef.: Wie »Rechteck«. Anschließend wird das 
Rechteck ausgefüllt. 

Ausfüllen: Malt eine beliebige schwarze Fläche wird in 
der gewählten Farbe aus. 

Kopieren: Diese Funktion kopiert einen beliebig großen 
rechteckigen Bildschirmausschnitt in einen anderen Teil 
des Bildes. Laßt man den Joystick/Maltafelknopf während 
der Bewegung des Ausschnitts gedrückt, wird mitdem Aus- 
schnitt gezeichnet. 

Text: Maximal 20 Zeichen lassen sich eingeben. Mit dem 
Joystick positioniert man dann den Text auf dem Bild- 
schirm. Läßt man den Joystickknopf gedrückt, wird mit dem 
Text wie bei »Kopieren« auf Bildschirm gezeichnet. 

Zoom: Mit dem Fadenkreuz wird ein rechteckiger Bild- 
schirmausschnitt bestimmt, der über den ganzen Bild- 
schirm vergrößert wird. In der Vergrößerung läßt sich nach 
Belieben zeichnen. 
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Die folgenden sechs Menüpunkte sprechen die rest- 
lichen Funktionen des Programms an: 

Farben: Auf dem Bildschirm erscheinen vier Farbbalken. 
Neben dem obersten Balken befindet sich ein Pfeil, der die 
gerade gewählte Farbe markiert. Mit <START > wähltman 
eineandere Farbean. <SELECT > verändert die Helligkeit 
der gewählten Farbe und <OPTION > variiert den Farbton. 
Durch <ESC> erfolgt die Ubernahme der Veränderungen 
und die Rückkehr in den Zeichenmodus. 

Grafik Stufe stellt die Auflösung des Bildes ein. Die ein- 
zelnen Stufen entsprechen denen in Atari-Basic. Zur Aus- 
wahl stehen Stufe 5, 7,8, 9, 10, 11 und 15. Die gewählte Stufe 
wird rechts neben dem Menüpunkt angezeigt. Stufe 5 bie- 
tet 80 mal 48 Punkte, wobei vier Farben frei zu definieren 
sind. In Stufe 7 erhöht sich die Auflösung auf 160 mal 96 
Bildschirmpunkte. Die höchste Auflösung bietet Stufe 8 mit 
320 mal 192 Punkten. Hierbei steht aber nur noch eine 
Farbe in zwei Helligkeiten zur Verfügung. Stufe 9, 10 und 11 
sind Unterformen von Stufe 8. Hier werden jeweils vier 
nebeneinanderliegende Punkte zu einem zusammenge- 
faßt. Die Auflösung beträgt in diesen Stufen 80 mal 192. In 
Stufe 9 sind 16 Helligkeiten in einer Farbe verfügbar, und in 
Stufe 11 stehen alle 16 Farbschattierungen einer Hellig- 
keitsstufe zur Auswahl. In Stufe 10 sind neun Farben wähl- 
bar, wobei jeder eine von insgesamt 256 Farben zugeord- 
net wird. In dieser so gut wie überhaupt nicht genutzten 
Grafikstufe des Ataris lassen sich sehr ansprechende Bil- 
der zeichnen. 

Löschen: Nach einer Sicherheitsabfrage wird das Bild 
gelöscht. 

Disk: Das Programm verzweigt ins 
Untermenü. 

- <D> zeigt das Directory von Laufwerk 1 an. 
- <L> lädt ein Bild von der Diskette. Dabei wird je nach 
Bild automatisch auf die richtige Grafikstufe umgeschaltet 
und die richtigen Farben gewählt. Bilder vom Atari-Artist 
Programm lassen sich nur dann laden, wenn sie mit 
<INSERT> gespeichert wurden. In diesem Fall legt der 
Atari-Artist die Bilder nicht in komprimierter Form auf Dis- 
kette ab. 

- <S> speichert ein Bild auf Diskette. 

- <ESC> kehrt ins Menü zurück. 


Disketten- 


iD —— 

i1 REM 

12 REM Graphic Draw 

i3 REM {c) 1987 Klaus Krassowski 

15 REM 

47 —— 

Sp GOSUB 12998: GOSUB 89088 

&B8 BLOAD "D:UPADSTK.BIN" 

&18 Z=USR (#988 „ADR(PMS$) NR) 

628 POKE #96B1,TEIL 

BB BLOAD "D:UKIPDRK.BIN" : DKAD=+7509 

spa GOTO 7188 

II —— 

1590 PROC BUT:REPEAT :IF JTF:A=sSTICK (%1) 

-14:ELSE :A=STRIG(ZB) :ENDIF :UNTIL As=%1: 

PAUSE 4: ENDPROC 

1597 — > 

1788 PROC CRSGRB 

1728 IF MODE=B THEN PÜKE 87,5 

1735 TRAP 15008 

1738 LOCATE X-1,Y,ER1:LOCATE X,Y-1,CRZ:L 
DCEATE X,Y+1,CR3:LOCATE X+1,Y,CRS 

1758 COLOR 1-CR1:FLOT %-1,Y:CDLOR 1-CR2: 

PLOT X,Y-1:C0OLOR 1-CR3:PLOT X,„Y*+1:COL0OR 
i-CR4: PLOT X+1,Y:PAUSE 3 

1788 COLOR CRi:PLOT X-1,Y:COLOR CR2: PLOT 
X, 1-1:COLOR CR3:PLOT %X,Y+1:COLOR ER4:PL 





Drucken erzeugt eine Hardcopy auf einem CP-80- 
Drucker. Dabei stehen zwei Vergrößerungsstufen zur Aus- 
wahl. 

- <1> produziert eine Hardcopy über die halbe Breite 
einer DIN-A4-Seite. 
- <2> druckt ein Bild über eine volle DIN-A4-Seite aus. 

Bei einer Hardcopy über die halbe Breite des Blattes wer- 
den Sie zusätzlich gefragt, ob Sie den Ausdruck in der Mitte 
des Bildes oder nach links oder rechts versetzt haben wol- 
len. Der Ausdruck paßt sich dann entsprechend dieser Ein- 
gabe an. Auf diese Weise lassen sich zum Beispiel doppel- 
seitige Einladungen drucken. 

Mit diesem Menüpunkt läßt sich ein Bild normal oder 
invers aufs Blatt nadeln. Farben werden automatisch in 
Grauwerte umgewandelt. Der Menüpunkt »Drucken« funk- 
tioniert nicht mit den Grafikstufen 5 und 7. 

Falls Sie einen anderen Drucker als den CP-80 von Sei- 
kosha besitzen, läßt sich die Hardcopy-Routine folgender- 
maßen anpassen: In Zeile 10230 des Turbo-Basic-Pro- 
gramms steht der Drucker-Steuercode zum Drucken von 
Bitmustern. In diese Zeile müssen Sie die Steuercodes 
Ihres eigenen Druckers eintragen. Für einen Epson kompa- 
tiblen Drucker muß die Zeile wie folgt aussehen: 

10230 GR$=CHR$ (27) :GR$(22)="K”:GR$(%3)=CHR$(192): 
GR$(4)=CHR$(0) 

Das Programm belegt fast den ganzen Speicher des 
Computers. Weitere umfangreiche Funktionen lassen sich 
also nicht integrieren. 

Wir hoffen, daß Sie mit Grafik-Draw jetzt nicht mehr stän- 
dig viele verschiedene Malprogramme zur Hand haben 
müssen, um in verschiedenen Grafikstufen zeichnen zu 
können. Viel Spaß mit dem Programm! 

(Klaus Krassowski/hf) 







Steckbrief 


Grafiker 






Eingabehilfe: Prüfsummer und AMPEL 


DT X+1,Y 

1588 COLOR COL:PAUSE 1 

1528 IF MODE=8 THEN FOKE 87,15:ENDIF 
1577 ENDPROC 

1777 REM - FUNKTIONEN 

zuB0 IF A=33 THEN 7202 

2849 IF A=54 THEN GOSUB 12088 

2888 FKTFG=HR: IF A=28 OR A=42 OR A=45 OR 
A=45 THEN 28708 

zu82 FOKE N754.N255 

2078 GSOTD 2702 

2508 REM „a. HAUPT 

2598 FF=%AB: EPF=%8: COL=SACOL: COLOR COL:POK 

E N754,N255:G05SUB 12088 

2828 IF GRS=18 THEN POKE 523,161 

2838 POKE $O6QF ,%1 

2782 # HAUPT 

2781 FKTFG=A1:A=PEEK (764): IF A<>N255 THE 

N 2220 

2782 IF STICK(#1)=7 THEN 7808 

2793 A=PEEK (53277): IF A=%5 THEN JTF=JTF= 

AB: POKE #9515,JTF:DPOKE #CB,X:POKE $CD,Y 
:50SUB F8Bd: FKTFG=S#O 

2784 IF A=5 THEN JTMP=ITMP=S4B: FPOKE O&8D 
‚„JTrmP:GOSUB 97808: FKTFG=%08 

2785 IF JTMP THEN FOKE 94BD,JTMP 

2718 IF JTF:P1={DPEEK ($B596) DIV TEIL-14 





) DIV (APIX/%2):Y=(213-(DPEEK ($9608) DIV 
TEIL)) DIV ASLI 

2715 STR=STICK(%1)-14:X=Pi:IF P1>212 THE 

N X=XA: Y=YA 

2720 X=X#(X>%0) ıY=Y#(Y>%0) 

2721 IF X>XMAX THEN X=XMAX 

2722 IF Y>YMAX THEN Y=YMAX 

2725 DPOKE $CB,X:POKE $CD,Y 

2739 ELSE :X=DPEEK ($CB) : Y=PEEK ($CD) :STR= 

STRIG (%B) :ENDIF 

2750 IF MODE=9 THEN 1=87APIKX: X=X DIV I%*I 

2770 IF GRS=8 AND STR=1 THEN EXEC CRSGRS 

2888 IF FKTFG AND MODE<>%1 AND STR AND X 

=XA AND Y=YA:GO# HAUPT:ENDIF :XA=X:YA=Y 

2958 ON MODE G0# DRAW,LINE,LINEX,KREIS,K 

REIS,RECHT,RECHT,FILL,COPY,TEXTG, ZOOM 

2995 REM -ı ZEICHNEN 

3208 # DRAW: IF STR THEN FF=%48:60% HAUPT 

3920 IF FF:DRAWTO X,Y 

3948 ELSE :PLOT X,Y:FF=%1 

3298 ENDIF :60# HAUPT 

3198 REM «= PUNKTE 

322@ # PUNKT:IF STR=XB THEN PLOT X,Y 

3298 60% HAUPT 

3495 REM -. LINIEN 

3590 # LINE:IF FF AND STR THEN MOVE SC2, 

SC1,SCL:PLOT X1,Y1:DRAWTO X,Y:ıG0# HAUPT 

3608 IF FF=%B AND STR=%8 THEN MOVE SC1,S 

C2,SCL:X1=X:Yi=YıFF=Z1:EXEC BUT:60# HAUP 

= 

3658 IF STR=%@ THEN FF=FF=%8:PLOT X1,Y1: 

DRAWTO X,Y:EXEC BUT 

3698 G0# HAUPT 

3699 REM -. LINIEN VERBUNDEN 

3708 # LINEX:IF PEEK(N764)=42 THEN FF=70 

:POKE N764,N255:MOVE SC2,SC1,SCL 

3718 IF FF AND STR THEN MOVE SC2,SC1,SCL 

:PLOT X1,Y1:DRAWTO X,Y:G0# HAUPT 

3758 IF FF=%Q AND STR=/8 THEN MOVE SC1,S 

C2,SCL:PLOT X,Y:X1=X:Y1=YıFFf=Z1:EXEC BUT 

:G0# HAUPT 

3888 IF STR=%X0 THEN PLOT X1,Y1:DRAWTO X, 

Y:X1=X:Yl=Y:MOVE SC1,5C2,SCL:EXEC BUT 

3998 GO# HAUPT 

3995 REM =. KREIS 

4080 # KREIS: IF MODE=5:RDi=ABS(X-X1):RD2 

=ABS(Y-Y1) 

4028 ELSE :RD1=SOR ( (X-X1)*2+C(Y-Yı)/CAPI 

X/ASLI))*2) =RDZ2=RD1# (APIX/ASLI):ENDIF 

4120 IF FF AND STR THEN MOVE SC2,SC1,SCL 

:CIRCLE X1,Y1,RD1,RD2:60# HAUPT 

4200 IF FF=40 AND STR=%8 THEN MOVE SC1,5 

C2,SCL:X1=X:Yi=Y:ıFF=%1:EXEC BUT:GO8 HAUP 

T 





4320 IF STR=%8 THEN FF=FF=%B:CIRCLE X1,Y 
1,RD1,RD2:EXEC BUT 

4490 GO# HAUPT 

4495 REM u RECHTECK 

4499 # RECHT 

45008 IF FF AND STR THEN MOVE SC2,5SC1,SCL 
:PLOT X1,Y1:DRAWTO X1,Y:DRAWTO X,Y:DRAWT 
DO X,Yi1:DRAWTO X1,Y1:60# HAUPT 

46880 IF FF=%#2 AND STR=%8 THEN MOVE SC1,S 
C2,SCL:X1=X:Yi=YıFF=%Zi:EXEC BUT:G0O# HAUP 
T 


4708 IF STR=%8:FF=FF=%Z8:PLOT X1,Yi:DRAWT 
O X1,Y:DRAWTO X1,Y1:DRAWTO X,Y1:DRAWTO X 
1,Y1 

4728 IF MODE=7 THEN N=1-(2#(Y1>Y))sFOR I 


=Yi TO Y STEP N:PLOT X1,I:DRAWTO X,„I:NEX 
TI 


4758 EXEEC BUT:ENDIF 

47298 GO# HAUPT 

47975 REM -. AUSFUELLEN 

SBO0 # FILL:IF PEEK(N744)=28 THEN MOVE S 
C2,5C1,5CL:POKE N754,N255 

Sa20 IF STR=4B: IF GRS=8 THEN X=X DIV #2 
189 PAINT X,Y:ENDIF 

sz82 GO# HAUPT 

Ssad REM -. KOPIEREN 





5528 # COPY 

s558 IF CPF=XB 

5688 IF FF=%8 AND STR=78 THEN MOVE SC1,5 
C2,5CL:X2=X:Y2=YıFF=%1:60%# HAUPT 

5617 IF FF AND STR:MOVE SC2,501,SCL 

5628 PLOT X2,Y2:DRAWTO X2,Y:DRAWTO X,Y:D 
RAWTOD X,YZ2:DRAWTO X2,Y2:60# HAUPT:ENDIF 

Ss7aa IF STR=XB:FF=%XB:CPF=%41:X4=X:Y4=YıX3 
=X2: Y3=Y2: XD=ABS (X4-X3) : YD=ABS (Y4-Y3) ıEX 
EC BUT 

5718 IF XD<%1 OR YD<#1 THEN CPF=%0:FF=%1 
:ENDIF 

5738 I=8/APIX: Z1=SC1:XDGER=INT (-XD/ID)*—% 
1: YDG=YD:MOVE SC2,SC1,SCL 

5750 ELSE 

5768 IF X>XMAX-XD THEN X=XMAX-XD 

5778 IF Y>YMAX-YD THEN Y=YMAX-YD 

5922 IF PEEK(N764)=63 

5830 PLOT X3,Y3:DRAWTO X3,Y4:DRAWTO X4,Y 
4:DRAWTO X4,Y3:DRAWTO X3,Y3 

SS8B PLOT X,Y:DRAWTOD X+XD,Y:DRAWTO X+XD, 
Y+YD:DRAWTO X,Y+YD:DRAWTD X,Y 

5922 ELSE 

5918 Z=USR(DKAD+328 ,Z1-SC1+SC2,271,XDGER, 
YDG,ABYT) 

5922 I=8/APIX: XDGER=INT (-XD/I)#-%1 

5938 QI=SC2+YS#ABYT+XZ DIV I:71=SC1+Yx#AB 
YT+X DIV I:YDG=YD 

5940 Z=USR (DKAD+328,01,Z1,XDGER,YDG,ABYT 
} 


5788 IF STR=4B THEN Z=USR(DKAD+3228,Z71,Z1 . 


-5SC1+5SC2„XDGER, YDG„ABYT) =: X3=X: YI3=YıX4-X+ 
xD: Y4=Y+YD:ENDIF 

5782 IF PEEK(N?7544)=42 THEN CPF=Z78:MDVE S 
C2,5C1,5CL:POKE N764,N255:ENDIF 

S7978 60# HAUPT 

37797 REM „. TEXT 

aaa # TEXTG:IF STR THEN FF=#1:MOVE SC2, 
SC1,SCL:TEXT X,Y,TXT$:IF PEEK(N?7&44)=45:6 
DTD S4BB:ENDIF :G0# HAUPT 

s&5B0 IF STR=48 THEN MOVE SC1,5C2,SCL:TEX 
T Kuh VYaTXTE 

83570 GO# HAUPT 

&4Bg POKE N764,.N255: TXTF="":N=%1 

8485 MOVE SC2,SC1,SCL 

&418 DO :GET I: IF I=155:EXIT :ELSE :TXT#$ 
{(N,„N=SCHRE (I) N=N+FAI1: MOVE SC2,5C1,5CL:TE 
xXT X, Y,TXT#=:LO0P :ENDIF 

&450 FOKE N754,N255 

54a GO HAUPT 

6497 REM „.. ZOOM 

s520 # ZOOM: ZMFG=%1 

6528 CPF=1:XD=48/ (APIX/ASLI)-41:YD=23 
5558 IF FF=#8 

6568 IF X>XMAX-XD THEN X=XMAX-XD 

6570 IF Y>YMAX-YD THEN Y=yYMAX-YD 

5538 IF STR 

&ö6ßd MOVE SC2,5C1,SCL 

6538 PLOT X,Y:DRAWTD X+XD,Y:DRAWTO X+XD, 
Y+YD:DRAWTD X%,Y+YD:DRAWTO X,Y 

55588 ELSE :FF=#1:MOVE SC2,SC1,SCL 

66970 X1=X:Y1=Y:REM 06G27=62:67=1:60SUB 880 
8:G7=0627 

6788 Z=USR (DKAD+480,4B ,PUFAD,X,„XD+%1,Y,Y 
D+#1 ,APIX) 

5778 ENDIF :60# HAUPT 

67880 ENDIF 

56808 I=k DIV B8:J=Y DIV B:%=Irb: Y=J#s 
6828 COLOR PEEK{PUFAD+Y2#CXD+A1) +X2): TEX 
T X2#8,Y2#8,"2 

_53":X2=1:Y2=J 

8858 IF STR=%8 THEN TEXT X,Y,"A":POKE PU 
FAD+J#(XD+rZ1)+1,COL 

87882 IF FEEK(N754)=42:FOKE N754,N255 
618 MOWE SEZ2,5C1,SCL 
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"„:COLOR EOL:TEXT %,Y,"{CTL 
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6928 Z=USR (DKAD+4B2,%1,PUFAD,X1 
„YD+Z1,APIX) 

6948 MOVE SCi 
OKE $CB,X:POKE $CD,Y:GOSUB 8920: 60# ZOOM 


„AD+41,Y1 
„‚SC2,„5SCL:FF=%B:X=X1:Y=Y1:DP 


6775 ENDIF :60# HAUPT 

7208 REM =. MENU 

858 IF FF=%#B8 AND MODE<>11 AND MODE{>F T 
HEN MOVE SC1,SC2,SCL 

’/ı020 POKE +9858D,70:FOKE +068F„70:POKE #38 

&18,%8 

7288 GRAPHICS AU: POKE 557,40: FOKE 53249, 
ZB: POKE 53258,X8:FOKE 718,18:PFOKE 789,0: 
POKE 712,80 

7218 POKE N764,N255 

7258 MPS=MODE:FOKE FB6sRC,„1F1:POKE FCED,MO 
DE*&: Y=MODE+5+545: G605SUB 7298 

3200 FOKE 752,%1:? "TESC CTL <3£CTL Q>IXE 
TL R+IETL R3{CTL R+tCTL RICCTL R>tCTL R} 
{ETL R3{ETL RYtCTL RYTETL RYXETL RYCETL 
R+IETL R>tCETL R>Ä{CTL RFÄCcTL RITETL RHScT 
L. R+£CTL RFSCTL RHtCTL R>{CTL RYtCTL Rıt 
ETL R3XCTL RYCCTL RYECTL R>iCTL RItCTL RR 
FiCTL R3tCTL R3£CTL RHtCTL R3ECTL RFtCTL 
ee 

7350 7 "ISHIFT =Faauaa2. 24, ,,,GCrafik.Draw 
"POSITION 37,413? "£{SHIFT =}" 

7388 ? "{SHIFT =322...(c)21987ı.Klaus.Kra 
ssowski2":POSITION 37,%42:7 "{SHIFT =}" 
74508 ? "XETL AFTCTL R>CCTL RFiCTL RıtCETL 
R+{CETL RFCTL RYECTL RYtcTL RrtCcTL Rıtc 
TL RITETL RHZCTL R+fCTL RHtCTL R>tCTL R> 
{CTL RFICTL RFECTL WILETL RHtETL R>{CTL 
R+£CTL RrÄiCTL R3tCETL RYZETL RY£CTL RYCCT 
L RFECTL RYtCTL RYZETL RFECTL RYIEETL Rt 
CTL R3£CETL RYtCTL C3" 


7a 7? "ÄSHIFT => Zeichnen „aaa... {SHIFT 
7605 ? "{SHIFT =3aLinie„..2,,,22aa1SHIFT 
7618 ?” "{SHIFT =}„Liniesfolgend.„. {SHIFT 
7815 7? "{SHIFT =?.Kreisiss 1.1... ,,{SHIFT 
7620 ? "{SHIFT =I4Ellipses. 4... 222, {SHIFT 
7625 ? "ZSHIFT =}7„Rechteck „41. .,.,{SHIFT 
7630 ?7 "{SHIFT =3,Rechteckıgef.- „aa t{SHIFT 
7640 7? "{SHIFT =3ıAusfuellenassa,,{SHIFT 
BE ? "{SHIFT =}7.Kopierensaas2s,,,{SHIFT 
7652 ?  "X{SHIFT =}, Textssssaaaas ss. . SSHIFT 
7654 7? "{SHIFT IL. Z00MaaAass ss ss Ju {SHIFT 
Do ? "{ETL A}sFarbenscaraasss{cCTL RY{C 


TL SH{ICTL RI{CTL R3tCTL RYtCTL R3AXCTL E> 
{ESC CTL =3{ESC CTL +3i{iSHIFT =}{ESC CTL 
_,"! 
Ta 7 "ISHIFT 
S,"7" 
7678 ? "{SHIFT =}.Loeschen„aaaass sr T{TCTL A 
>tETL R>{iCTL R>XCTL R3CCTL R3ITETL X3{CTL 
RFLCTL RY£CTL RYECTL R3£CTL RF£{CTL Ric 
TL RF{CTL RYITETL R3{CTL RYÄZCTL E>It{ESC CT 
L =4:ESC ETL +3{XSHIFT =+#ESC CTL -+" 
7880 ? "<SHIFT =}, Disk...,21.1....°2":6GRN 
$ 
76978 7? "{SHIFT =>IaDruckensszanassr TCTL A 
+XETL R3{iCTL R3£CTL RH{CTL R3tETL R>ECcTL 
R+£CTL R>fCTL R>tCETL RYiCcTL R>£{CTL Rrtc 
TL RF{CTL RITCTL RYECTL RICCTL DILESC CT 
L. =}7{iESC CTL +>7{iSHIFT =3{ESC CTL +" 
7672 ? "XSHIFT =}aZeichengeraet...:"3 
7695 IF JTF:? "Touch„Tablet":ELSE :? "Ja 
ystick":ENDIF 
7698 ? "CCTL ZIECTL RIECTL RIECTL RICCTL 
R>{CTL RYHtCTL R3{SCTL RY{CTL RH{CTL R3{C 


=},.Grafik,„Stufeii.,.:[":6R 


AL 


<HX?> 
«U0> 
sHF> 
<HC> 
<ra> 
“N5> 
<XG> 
sDE> 


<FY> 


<BB> 
<PUF 


<BJ> 


rar 
<ZH> 


Ic» 
<sKr> 
<aN> 
“EN? 
sur > 
<UD> 
x0Z> 
<FV> 
<HH> 


<HB> 


“FO> 


<EG> 


<sXP> 


<cHh> 


SV > 
<GI> 


sAu> 








TL- RF£CTL R3{CTL R3£tCTL RYtCETL RISETL R3 
{CETL RITCTL RISCTL X3tETL RItCTL RICCTL 
R+<CTL RYiCTL RYicTL RY{ETL RYECTL RICCT 
L R+tCTL R3tETL RICETL RYftETL RITiCTL RIt 
ECTL R+iCTL C}":?7 :POKE 752,70 


7’eaa DO :IF JTF=%8: Y=PEEK ($CD):A=Y DIV & 
7705 ELSE :Y=2B8B-PADDLE (HI) : YaYa (YA EA 
=Y DIV 18: PAUSE %Ai1:ENDIF 

7718 ST1=STRIG (48) :5ST2=STICK (#1) -14 

7714 IF A AND MPS< >A: MPS=A 

71& IF MPS>17:MPS=17:POKE $CD,MPS#5:ELS 
E 

7715 SOUND %98,MPS*5+28,128,LAUTS=:PAUSE #1 
T2B Y=MPS#+8+56:G0OSUB FOB0 

7725 ENDIF :SDUND %9,%8,%42,#ZB:ENDIF :IF 
sSTi=%8 OR STZ=#48 THEN EXIT 

773580 LOOP 

7778 IF MFS<12 THEN MODE=MPS 


7800 IF MPS=135 THEN GOSUB 14298 

7810 IF GRS=S AND (MODE=9 OR MODE=11 OR 

MPS=16) THEN GOSUB 9820: MODE=1:G60T0 7198 

782@ IF MPS=14 THEN ? "Bild«Loeschen“LJ/ 

NIA®3:GET I:IF I<>ASCl"T") THEN 73080 

7338 IF MPS=18 THEN ? "Texta—->a:";2 INPUT 
TXT$ 

7858 IF MPS=15 THEN SOSUB 17292 

7878 IF MPS=17 THEN JITF=JTF=%8:POKE $861 

5,JTF:GOTO 7388 

788@ IF MODE=9 THEN POKE $96418,%1 

7908 IF MPFS=1& THEN GOSUB 21208 

79748 REM 

7958 FOKE 53249,%0:POKE 53258,%8 

7968 POKE 559,%2: GRAPHICS GRS+16:SC1=DPE 
EK (88) 

7962 GOSUB SEA0:G0SUB 15008 

7965 POKE $B6BC ,YMAX:MOVE SC2,SC1,SCL 

7978 IF GRS=B THEN FOKE 712,%2 

7975 IF MPS=14 THEN CLS #6:MOVE SC1,5SC2, 

SCL 

7988 IF MPS=1& AND DRFG THEN GOSUB 20008 
:G60T0 7228 

7985 IF MPS=12 THEN GOSUB 12508 

7998 IF MPS=15 THEN ON LSF GOSUB 18900,1 
SSAR:GOSUB 15BAA: MOVE SC1,SC2,SCL:60T0 7 


GOTO 2688 

REM 4. FM STEUERUNG 

NR=42:RESTORE 8129+6Z*12 

DO :READ A:IF A=-1 THEN EXIT 
NR=NR+471:PM$ (NR „NR) =CHR$ (A) 

LOOP :POKE s@4QE „NR 
DATA.B,2,48,48,72,72,72,72,48,48,0, 





DATA.2,0,32,32,80,30,32,32,8,-1 
DATA.9,0,48,48,204,48,48,8,—1 
DATA.2,8,24,24,1822,24,24,0,-1 
DATA.2,0,48,48,204,48,48,0,—1 
| DATA.9,0,32,32,589,32,32,8,0,8,-1 
; DATAx8,0,2,8,8,-1 

POKE 559,62:POKE 705,15 

I=PEEK (186) -4B: PMAD=1I#256+1280 

POKE 54279,1:POKE 53277,%3 
| FOKE 53257,%08:REM PLAYER 1 !! 

POKE 53258,%1 

POKE PMAD,%@:MÜVE PMAD,PMAD+%1,N255 
83180 POKE PMAD+N255,42:MOVE PMAD+N255,PM 
AD+256 ,N255 
8320 FOKE PMAD+N255+29 ,N255:MOVE PMAD+N2 
55+20 ,PMAD+N255+21,102 
8358 POKE 53250,48 

8498 RETURN 
87970 REM ıı PM MENU 
9222 POKE PMAD,ZO:MOVE PMAD,PMAD+%1,512 
9952 POKE 559,62: FOKE 53277,%3:POKE 623, 
#1 
7255 IF MPS<12:POKE 705,186:POKE 706,186 
:ELSE :POKE 785,42: POKE 796,42:ENDIF 
9078 POKE 53257,%3:POKE 53258, 43:POKE 53 
249 „62: POKE 53250,90 
91AD MOVE ADR(PM2E) „PMAD+Y,8 








7128 MOVE ADR(PM2F) „PMAD+Z2S6+Y,8 


F71?72 RETURN 
94997 REM „ PM AUS 


9508 POKE 718,1&4:POKE 799,12:PFOKE 795,16 


:POKE 786,16: RETURN 
9799 REM - TON 


7802 SOUND %9,79,19,LAUTS: FAUSE 9: 50UND 


B,20,%8,#B: RETURN 
120002 REM „u. INIT 


18028 DIM PM$ (38) „PMZ# (13) SERTILTLTTRRNS 


PUFF(1B80), CPFS (320) 


10050 DIM As (15) \ERN$ (15) „TXT$ (40) 


18840 DIM SCOL (7,8) 


180598 SCZ=ADRIGRSIIF) :PMSTR=ÄDR (FM$) 


192688 DIM GRF(&) ,KLRF(AD) 
18159 Pm2$="{ESC CTL 

ECTL >73": PM2# (42) =PMZF 
181724 GR5SIIS="iCTL „>": 


>>" PMZFC127="{ESC 


GRSII$(1S3BB)="XCT 


L „I"3GRSIIS(X2)=GRSIIS:PUFF=GRSIIF 


19208 KLRE="\ 
$: ERN$=KLRF 
1232220 PUFÄAD=ADR (PUFS$) 

18250 GRF=CHRS (ZI: GRE CHI =" K" 
12358 N255=-255: N784=764 


18358 COL=#1: ACOL=COL: DFMT=#1: DRFG=48: JT 


":KLRS(4DI =" KLRF$(HZI=KLR 


F=48: JTMP=%B: INVFG=%0: LAUTS=4: TEIL=%2 


in4220 MODE=%1 


104180 GZ=8:50SUB 141228:G0O5SUB 145900 


18498 RETURN 
12022 REM =. FARB WAHL 


12828 GOSUB FSBR:A=CMH: IF GR5S=7 OR GRS=11i 
THEN A=16 
12838 IF GRS=B AND MODE=8 THEN FOKE 87,1 


sıh=4:X=X DIV %2 
12880 ACOL=COL 
12188 COL=COL+%1 
12128 COLOR COL 


- {COL+Z1)# (COOL >=4 


-A1) 


12288 IF GRS>8 AND GRS<12 OR (GRS=8 AND 
MODE=8) :POKE Ze Tg MOVE SE1,„ADRIEPFE) 


122208 PAUSE 38: 


12389 ENDIF :FOKE N764,N255 
17398 RETURN 

12498 REM .. FARB MENU 
12508 
=i1 THEN A=16 

12588 FOR I=%8 TO A-%1 
12640 
12658 
c: IE 
127028 
12728 


en [1 


MOVE ADRICPF$) „SC1 
SE :POKE 785,6C0DL (CMEN#=ZZ+#1 ,„COL) 


COLOR I: TEXT %#0,I#12,A#0%1 
NEXT 1:COL=%48: TEXT 54/APIX,%B,"{ES 


DO :A=PEEK (53277) : J=CMEN#=A2 
IF A=& THEN TEXT S4/APIX,„COL#12,". 


‚SZ2U:EL 


A=CM: AF="_....,.,,.": IF GRS=#7 OR GRS 


„S/APIX) 


COL=(COL+A13#1COL<CM-Z1I: TEXT S4/APIX, 


COL*12,"{ESC CTL 


+}":G0OSUB 9588 


12748 I=6COL(J+%21,COL)=:H=I MOD 15:F=I-H 


12789 IF A=%#53 THEN F={F+1ö)#+(F<24B) : SCOL 
(J+#1,„COL)=F+H:POKE GCEOL (J,COL) „F+H:PAUS 


E 18 


12588 IF A=5 THEN H=(H+rA2) # (H<14) :GCOL (J 


+%1 ,COL)=F+H:POKE SCOL(J,COL) „F+H: PAUSE 





12 

12888 IF PEEK(N764)=28 THEN POKE N764,N2 
SSSEXIT 

12908 LOOP 

12999 MOVE SC2,SC1,SCL:RETURN 

14000 REM «= GRAPHIC WAHL 

14023 ACOL=%B8:G0OSUB 9589:? "{ESC CTL <3t 
ESE CTL =)" 

14858 ? "WelchesGrafik-Stufe?":? ı7 "1,= 


[ı51" 7 "2,=,[,.71": 7 
t191":? 
14058 ? FE 1 


14978 REPEAT :GET I:I=I-48:UNTIL I>%X@ AN 


D I<S 
140808 GZ=]1 


14108 RESTORE 14392+GZ#1QB:READ GRS,SCL,X 
MAX ,YMAX,ABYT,APIX,ASLI,„CMEN,CM 


"Za=,[.9] "7 "AuSı 
ER 0 5 Er a "4,=,015]" 


14218 DPOKE #95BA,XMAX:POKE $DABC,YMAX 
14222 POKE FBA11,AFPIX:FPOKE $9512,ASLI 


ırD> 
sFX> 
<sor?> 


<LH?> 
<HB> 


Jc> 


<AC> 


<LO> 
<HT> 
sBU> 
<UI> 


s<RU> 
<JL> 
S“2H> 


“ELr 
<cER> 


<IS> 
<EG> 
<AV?> 





14528 


RETURN 


REM GRS,„SCL,XMAX ,„YMAX ,„ABYT,„APFIX,AS 


DATA-S5,960,79,47,20,4,4,1,4 
DATAA7,3848,159,95,49,2,2,1, 
DATA?,7688,79,191,48,4,1,3, 
DATAL19,7689,79,191,48,4,1,2 
DATA.11,7680,79,191,48,4,1,3 
DATA15,7688,159,191,48,2, 
DATA.8,7488,319,191,40,1,1,2 
REM “= COLORS 

RESTORE 146488 

FOR N=%8 TO %3:READ J 

FOR I1=%8 TO J-%1 

READ A,B:SCOL (N#%2,1)=798+A 
SCOL (N#%2+71,1)=B 

NEXT I:NEXT N 

RETURN 

DATA-2,10,0,9,15 
DATAA4,12,0,8,186,7,158,12,40 


4 

1 
) .7 
F „1 
1, 1, 
= 7 


2 


DATA=F „4,8,.5, 14,6, 154,7, 159,8,52,7 


‚176,18,90,11,80,12,68 


145538 DATA1,12,8 

15892 REM „ı FARBEN SETZEN 

ıi5Sa1a FOR I=%#B TO EM-#1:J=CMEN+%2 
158528 POKE GCOL(J,I)},GCOL(J+%1,73 
15188 NEXT I:RETURN 

172080 REM „. FILENAME 

178805 TRAP 728B8:G05UB 7580:? "{ESC CTL <£ 
+XESC ETL =3DiskMenu" 

17018 DO :LSF=%4B:”? 

i782B8 ? "I[D1,.Directory" 

17058 ? "[L]sLaden" 

17840 7? "t514Speichern" 

17858 ? "L[X{ESC ESC}HIESC ESCHILENDE":? 
17850 GET I 

17128 IF I=75 THEN LSF=#Z1:EXIT 

17118 IF I=83 THEN LSF=e#Z:EXIT 

17128 IF I=538 THEN ? :7 :DIR 

17125 IF I=27 THEN EXIT 

17138 LODOP :IF I=27 THEN 17328 

17148 PUT 1+128:?7 :? :IF LSF=#2 THEN ? 
"ZESC ETL #3"; 6GRNF; "tESC CTL +3" 

17158 INPUT "Filenames{ESC ESCYTESC CTL 
=>" A$ 


17188 A=INSTR (A$,„":")=sIF A=%#2 OR A=#5 TH 


EN GRN$=AF:RETURN 


17188 
17509 
13008 
181090 
18158 
15288 
13250 
18388 
183528 
18548 
18358 
15428 
154979 
18589 
15502 
187208 
1588D 
15828 
18558 
18858 
13358 
159728 
22220 
2B1B8 
28128 


‚s1) 
: 2B15B 


GRNS (%1)="D: "GRNS (XI) =AS$ 
RETURN 

REM zu. LADEN 

TRAP 18499:0PEN #4,4,2,5RN$ 
ACOL=KB:CLS #6:BGET #4,5C1,SCL 
GET #4,I:IF I=75 

GET #4,62:60SUB 14198 

GET #4,CM 

FOR I=%8 TO CM-%1:J=CMEN«Z2 
GET #4,A:GET #4,B 

SCOL(J, 1) =A+722:GLOL(J+%1,1)=B 
NEXT I 

ENDIF :CLOSE #4: RETURN 

REM “u. SPEICHERN 

TRAP 1898@:0PEN #4,3,8,6RN$ 
BPUT #4,5C1,SCL 

PUT #4,75:PUT #4,6Z:PUT #4,CM 
FOR I=%4® TO CM-%1:J=CMEN#%2 
A=6COL(J,1)-798: B=6GCOL(J+%41,1) 
PUT #4, A: PUT #4,B 

NEXT I 

CLOSE #4: RETURN 

REM «4. DRUCK RODUTINE 


TRAP 2B508:0PEN #3,8,8,"P:" 


IF INVFG THEN Z=USR (DKAD+288 „ YMAX+ 


7? #5; "TESC ESCHATCTL H>" 


Listing 1. »Grafik-Draw« (Fortsetzung) 
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29288 FOR N=SC1 TO SC1+SCL-I20 STEP 328 

20258 IF PEEK(N764)=1258 THEN POKE N744,N 
255; EXIT 

20382 Z=USR(DKAD,DFMT,N,SC2) 

20358 IF DFMT=%#1 THEN ? #3:KLR$(#1,DPS); 
GRFSGRSII$(%1,320) 

20480 IF DFMT=%2 THEN ? #35 6R$; GRSII8F (#1 
„840):?7 #3; 6R$;6GRSII#(641,1280) 

20450 NEXT N 

ZaS08 IF INVFG THEN Z=USR (DKAD+288,YMAX+ 
43) 

20559 MOVE SC1,SC2,SCL 

2OLAD CLOSE #3: RETURN 

21000 REM “4. DRUCK FORMAT 

21250 GOSUB 9508 

21188 REPEAT :? "{ESC CTL <}XESC CTL =} 
ESC CETL =3DRUCK“Format":? "{ESC CTL =}C1 
]«HalbeDIN-A4.Breite":?7 "[2] Banze,DIN. 
A4.Breite":”7? » 

21128 GET A:PUT A+128:A=A-48 

21158 UNTIL A>Za AND A<Y3 

21208 DFMT=A 

21258 IF DFMT=%1 THEN GR$(3,3)=CHR$ (64): 
GR$ (4,4) =CHR$ (1) 

21458 IF DFMT=%2 THEN GR$(3,3)=CHR$ (128) 


Frogrammname :UPADSTK.BIN BBEB:AE 
Länge :400 Bytes BREB:CD 
4 1 dGaFG: SE 


:6R$(4,4)=CHR$ (2):6G0TD 23098 

21758 REPEAT :? "{ESCE ETL <YfZESC CTL =t 
ESC ETL =+DRUCK-Fosition":? "t{ESC CITL =} 
EllsLinks":? "[C21.Mitte":? "[3]aRechts": 
? "[41.Individuel" 

21888 ? :GET ArPUT A+128:A=A-48: UNTIL A> 
AB AND A<S 

21858 IF A<>4: DPS= {A-41)%*19+%1 

22150 ELSE :7 :HEFEAT :7 "{iESC CTL -YiES 
EC SHIFT DEL>Position„.[1-481,.:";3: INPUT DF 
S:UNTIL DPS>AB AND DPS<S41 

25888 ENDIF 

23028 ? :? "{ESE ETL => Invers“.Druckensa[l 
J/NI12."3:GET IzIF I=ASC(C"J3")2 INVFG=SZ1:ELS 
E : INVFG=#8:ENDIF 

235090 ? 27 "XESC CTL =>Starte,Drucken„„[ 
J/N12"5:GET I 

23518 IF I=SASCt"J"}:DRFG=A1:ELSE :DRFG=% 
B: INVFG=48: ENDIF 

24888 RETURN 


Listing 1. »Grafik-Draw«s (Schluß) 


2230: E5 
0238:%77 
22408:5E 


Boa: FF 
2008:85 
BB1lB: BE 
BaiBr14 


2020:AF E 


2028: 04% 
2052: 02 
2038:03 
BB: 
BR4B: 
2B25B:01 
2959:8& 
BED: AD 
DaB: A 
20720:B&5 
2878:04 
BR8B: AE 
Bose: 7B 
DR7B:CC 
DBRFB: AS 
BaAd: ET? 
Band: Ba 
BORN: 27 
BOBS: CA 
BEACH: CD 
DaCS: FO 
BODa: BA 
Babsr 05 


BBBANZABaS 


Frogrammname :UKIPDRK.BIN 


BoBB:FF 
2D098:&58 
2018:DE 
BEO1S:EF 
2920: B& 
2028:18 
2950:890 
2838: E83 
9940: 64 
B248:D0& 


2058:B1 


22598:D5 


[u] N EZ 


5858:DS 
Ba7B: AD 
BB78: 56 
Bad: 7 
BOSB:EC 
BB97B: 1 


BAFB:4C 
BıBB: ic 
A1288:C08 
BilB:CD 
23118:02 
08129: 27 
B128:1& 
8130: B4 
2138:09 
8140:CC 
0148:13 
2158:11 
28158:D8 
2159:B& 
B158:4C 
Bı7B:EE 
2178:1135 
2188: 18 
0188: D2 
BI1EB:&DB 
B1ES:BRO 
BIFB:E2 
B1F8B:15%5 
DB: Eh 
232708:DO 
B210:D&A 
2218:Fd 
25220: AD 
0228:55 


2978: A5 
BBAB:E& 


BRAS:AD G 


BBBU: DE 
BBBB: 02 
Boca: 85 
BECH: 05 
BaDa: 18 
2208: DE 
DREB: OB 


. BOEB: A4 


DOFO: B&4 
BRFE:B4 
B1BR:AC 
B108: 09 
B118:20 
8118:08 
8120: 48 
9128:59 
81308: E08 
8138:072 
2148:D8 


SnhEPBASB 


<8D> 
<E6> 
<B6> 
<bc> 
<978> 
<8D> 
<E2> 
£7A> 
<3A> 
<B> 
<A9> 
<29> 
<93> 
<59> 
<an> 
<12> 
<52> 
<B6> 
<E&> 
<95> 
<21> 
<29> 


0243:57 
2250:77 
0275B:809 
22509:D5 
DB258:A5 
2270:Bi 
B27E:FF 
2289:85 
8288:0& 
D298:4C 


B298:853 


BZAB: D& 
DAS: AD 
D7Ba: 91 
B2B8: 91 
BICB: E& 
BZCB: DO 
B2DB:EB 
B2D8: 75 
BZEB:ESB 
D2ES:81 
BZFO:83 
D2ZFS: Ba 
2520: 00 


Listing 2. Bitte mit AMPEL 
eingeben 


2150:&48 
23158:58 
B158:D5 
B148:88 
8178:65 
BI7B:E2 
QBI1BG:EF3 
B188:B0 
8190: 50 
2178: 68 
BIAB: DS 
21A8:85 
21B8:82 
B1B8:48 
81C9:458 
231C8:87 
B1D2:8D 
21D8:D5 


Listing 3. Bitte mit AMPEL 
eingeben 


SONMEHBELERHSS 


DSSERNAEHE 


85 
85 
EB 
EB 
Ei 
7a 
20 
BE 
Du 
Ei 
86 
58 
58 
85 
Da 
85 
35 
35 








Dreidimensionale Computergrafiken sind immer 
häufiger Bestandteil von Film und Fernsehen. Mit 
dem Atari lassen sich bereits ansehnliche Grafi- 
ken berechnen und darstellen. 


| icht nur in der Industrie, in der Entwicklung oder im 






| hen, besonders in der Werbung, bedient man sich 
immer mehr der »Bilder aus dem Computer«. Das ist kein 
Wunder, denn die Kosten für computeranimierte Filme sind 
drastisch gesunken. Computer, die solche Leistungen brin- 
gen, sind meistens teure Grafik-Workstations oder Super- 
computer wie die »Cray« und besitzen neben schnellen 
Programmen spezielle Hardware. Dadurch wird die Grafik 
wesentlich schneller und viele Grafik-Routinen überflüs- 
sig. Eins steht auf jeden Fall fest: Die Berechnung von drei- 
dimensionalen Grafiken mit verdeckten Kanten, Schattie- 
rung und Lichtreflexen braucht sehr viel Speicher und eine 
Menge Zeit. 

Mit diesem Beitrag wollen wir nicht die mathematischen 
Grundlagen der dreidimensionalen Grafik erklären. Dafür 
behandeln wir das sogenannte »Clipping« oder »Window- 
ing«, verdeckte Kanten und die Berechnung von Schlag- 
schatten einfacher Objekte. Da bestimmte Unterpro- 
gramme immer wieder Verwendung finden, werden die ein- 
zelnen Prozeduren gesondert in einem Satz erläutert. 

Steigen wir mitdem »Clipping« ein. Dahinter verbirgtsich 
nichts weiter als das Kappen von Linien, die über den Bild- 
schirmrand hinausgehen. Ganz so einfach ist die Sache lei- 
der nicht. Ein wichtiger Faktor ist nämlich der Winkel, unter 
dem die Linie den Bildrand schneidet. Die Clipping- 
Routine berechnet nun im Prinzip die Länge und den Win- 


kel des nicht sichtbaren Teils einer Linie gegenüber dem: 


Bildrand und liefert als Ergebnis die erste wieder sichtbare 
Koordinate dieser Linie. 

Der hier verwendete Clipping-Algorithmus wurde in 
Amerika von »Evans und Sutherland«, Pionieren der Com- 
putergrafik, entwickelt. Dieses Unternehmen liefert Com- 
putersimulationen hauptsächlich für militärische Zwecke. 

Doch nun zum Programm: Innerhalb der Routine wird 
mit Hilfe der Prozedur »CODE« zunächst ein 4-Bit-Code 
berechnet, wobei die Bits folgende Bedeutung haben: 
Bit 1: Punkt ist links vom Bildrand 
Bit 2: Punkt ist rechts vom Bildrand 
Bit 3: Punkt ist unterhalb vom Bildrand 
Bit 4: Punkt ist oberhalb vom Bildrand 

Die Variablen, die diese Bitkombinationen enthalten, 
sind C, C1 und C2. CZ dient hier nur als Tauschvariable. Die 
Bits sind entsprechend den Bitpositionen innerhalb eines 
Byte in den Variablen enthalten. Die Prozedur »CLIP« 
berechnet dann Länge und Winkel der verdeckten Linien). 
Dieser Prozeß wird solange durchlaufen, bis die Prozedur 
erkennt, daß die ganze Linie unsichtbar ist (Bedingung: 
V15=0). Wenn Teile der Linie oder die ganze Linie sichtbar 
sind, so lautet die Bedingung V1S=1. Haben alle vier Bits 
den Wert 0, befindet sich der zu setzende Punkt oder die 
Linie innerhalb des Bildes und kann gesetzt werden. Die 
Variablen, die die Bildschirmgrenzen festsetzen, heißen: 


CLIPYB für den unteren Rand 
CLIPYT für den oberen Rand 
CLIPXL für den linken Rand 

CLIPXR für den rechten Rand 


Durch Verändern dieser Variablen (im Listing Zeile 40 
und 50) wird jeder beliebige Bildschirmbereich bestimmt. 





3D-Grafik in Turbo Basic 


CAD-Bereich, sondern auch ın Film und Fernse- _ 











Das Objekt oder sichtbare Teile davon werden nur inner- 
halb dieses Fensters dargestellt. Obwohl wir hier mit dreidi- 
mensionalen Objekten arbeiten, istdie Clipping-Routine im 
Prinzip für zweidimensionale Objekte gedacht. Da aufdem 
Bildschirm aber zweidimensional abgebildet wird, kann die 
Routine verwendet werden. Es existiert zwar auch ein 
Cohen-Sutherland-Algorithmus, der dreidimensional ar- 
beitet. Er ist aber nur von Interesse, wenn man sich in das 
Objekt»hinein«begeben will. Damit dieses dennoch mit der 
hier verwendeten Routine bedingt möglich ist, wird in der 
Prozedur »CALCPOINT« die Z-Koordinate eines Punktes 
automatisch auf 1 gesetzt, wenn diese vorher kleiner war. 
Damit wird verhindert, daß eventuell »vor« dem Bildschirm 
liegende Objekte durch falsche Berechnung ein Linien- 
chaos auf dem Schirm erzeugen. 


Bild 1. Ein bekanntes Zeichen in 3D 


Ein nächstes Problem bereitet die Berechnung der ver- 
deckten Kanten und Flächen (Bild 1). Uber das »Hidden 
Line« oder »Hidden Surface«-Problem gibt es jede Menge 
Literatur, sogar Dissertationen und andere wissenschattli- 
che Arbeiten. Entsprechend groß ist auch die Anzahl der 
Methoden und Algorithmen zur Bewältigung dieses Pro- 
blems. Die meisten Verfahren sind Scan-Algorithmen, bei 
denen das Bild Zeile für Zeile abgetastet, untersucht und 
dann entsprechend bearbeitet wird. Unsere Lösung ist ein 
Prioritäts-Algorithmus, der einen vertretbaren Kompromiß 
zwischen Aufwand und Genauigkeit darstellt. Es istein ver- 
einfachter »Newell-Sancha«-Algorithmus. Zur weiteren 
Erklärung betrachten wir zuerst die Koordinaten- 
Verhältnisse. 

Da wir hier dreidimensionale Objekte darstellen, braucht 
unser Koordinatensystem die Achsen X, Y und Z, wobei die 
Z-Koordinate senkrecht auf dem Bildschirm steht. Bei grö- 
Ber werdenden Z-Koordinaten bewegt man sich in den Bild- 
schirm hinein. 

Um verdeckte Kanten darzustellen, ist es von großer 
Bedeutung, wie das Objekt im Speicher des Computers 
abgelegt wird. Da wir von jetzt an nicht mehr nur Eck- 
punkte, sondern ganze Kanten des Objektes betrachten, 
müssen diese dem Programm als solche erkennbar sein. 
Zusätzlich zu diesen Informationen braucht der Computer 
noch Angaben über die Anzahl.der Kanten jedes einzelnen 
Polygons und über die Verbindungslinien. 

Ein Würfel besteht jetzt nicht mehr aus 8 Eckpunkten, 
sondern aus 6 Polygonen. Diese exakte Beschreibung des 


Af 





Objektes ist eine grundlegende Bedingung, um eine 

Ansicht mit verdeckten Kanten zu berechnen. 

Der Algorithmus funktioniert folgendermaßen: Nachdem 
die Rotationen und alle anderen Transformationen beendet 
sind, sortiert die Prozedur »SORTPOLY« alle Polygone 
nach der Z-Koordinate. Dadurch bekommen die Polyaone 
eine Priorität zugewiesen. Das Polygon, das am weitesten 
vom Betrachter entfernt ist, erhält die niedrigste Priorität. 
Die Polygone werden dann in der Reihenfolge ihrer Priorität 
auf den Bildschirm gebracht. Zuerst wird das Polygon der 
niedrigsten, zuletzt das Polygon der höchsten Priorität 
gezeichnet. Dabei ist zu beachten, daß nicht nur die äußere 
Umrandung des Polygons (Linien, die das Polygon bilden) 
gezeichnet wird, sondern das ganze Polygon in Form einer 
Fläche. Im Programm erledigt das die Prozedur »DDA«. 
Und schon ist die 3D-Darstellung mit verdeckten Kanten 
fertig. 

Die Sache hat aber leider einen Schönheitsfehler. Der 

Algorithmus funktioniert nämlich nicht immer. Es wird 

besonders dann kritisch, wenn sich Polygone in der Z- 

Ebene überlappen. Betrachten wir dazu einmal Bild 2. 

Wenn man nach Z-Koordinaten sortiert, erhält Polygon 2 

eine höhere Priorität als Polygon 1, weil dessen Z-Wert grö- 

Ber ist als der von Polygon 2. Im Ergebnis würde zuerst 

Polygon 1, dann Polygon 2 gezeichnet werden. Von der Dar- 

stellung her ist das falsch. Dieser Fehler ließe sich durch 

Erweitern der Sortierkriterien zwar umgehen, was aber 

wieder auf Kosten der Rechenzeit gehen würde. Möchte 

man dennoch die Berechnungen korrekt durchführen, so 
ergeben sich mit Bezug auf Bild 2 folgende Sachverhalte: 

Polygon 1 verdeckt Polygon 2 (im folgenden P1 und P2 
genannt) nicht in dem Fall, 

- daß ein einleitender Test der Z-Werte ergibt, daß sich P1 
und P2 in der Z-Ebene nicht überlappen. 

- daß ein Test der größten und kleinsten X- und Y-Werte der 
einzelnen Polygone ergibt, daß sich diese in XY-Richtung 
nicht überlappen. 

- daß alle Kanten von P1 weiter vom Betrachter entfernt sind 
als die Ebene von P2. Hierzu werden die X- und Y-\WVerte 
von P1 in die Ebenengleichung (AX+BY+CZ+D=0)von P2 
eingesetzt und die »Tiefe« von P2 berechnet. 

- daß alle Kanten von P2 näher am Betrachter sind als die 
Ebene, die P1 aufspannt. 

- daß ein kompletter Überlappungstest zeigt, daß sich die 
Polygone in X/Y-Richtung nicht überlappen. 

Werden alle diese Tests durchlaufen, muß man eine 
Menge Geduld haben. Versuche mit vielen Objekten haben 
ergeben, daß man trotz ausschließlichen Sortieren nach 
Z-Werten fast immer die korrekte Darstellung erhält. 

Die Berechnung von Schlagschatten ist gegenüber den 
verdeckten Kanten und Flächen eigentlich recht simpel. 
Grundkenntnisse der Vektorrechnung und analytischen 
Geometrie erleichtern das Verständnis. An der Mathematik 
kommt man (leider) nicht vorbei. Dazu betrachten wir nun 
Bild 3. 

Es sei | der Vektor vom Koordinatenursprung zur punkt- 
förmigen Lichtquelle mit den Koordinaten (LX,LY,LZ) und p 
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Bild 2. Fläche P1 verdeckt P2 
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der Vektor zu einem beliebigen Punkt P mit den Koordina- 

ten (PX,PY,PZ) einer beliebigen Kante eines Polygons. 

Dann gilt: 

1) r=p-I (Vektorsubtraktion) 

Wir erhalten einen neuen Vektor r mit den Koordinaten 
(RX,RY,RZ). Der Schlagschatten des Punktes P soll nun 
auf die Y-Ebene mit Y=0 fallen. Der sich ergebende Punkt 
soll PS heißen. Wir erhalten somit: 

2) PS=I+S*r 
Der Vektor vom Koordinatenursprung zum Punkt PS 

ergibt sich also aus dem Vektor | plus den verlängerten Vek- 

tor r. Hierzu wird der Vektor rmiteinem Skalar S multipliziert 
und dann zum Vektor | geometrisch addiert. Da wir wissen, 
daß die Y-Koordinate des Punktes PS immer gleich 0 sein 

muß, ergibt sich für S eine lineare Gleichung in \f: 

3) 0=LY+S*RY oder [Y+S*+RY=0 = > S=-LY/RY 
Bildlich gesehen ist der Schlagschatten eines Polygons 

eine Projektion dieses Polygons auf eine Ebene, in diesem 

Fall die Ebene Y=0. 

Wem das alles zu theoretisch ist, der betrachte Bild 3. 
Dann sollte einiges klarer erscheinen. 

Als letztes kann man sich überlegen, daß der Schlag- 
schatten eines Objektes gleich der Summe der Schlag- 
schatten seiner Polygone ist. Zeichnen wir also zunächst 
jedes Polygon und dann den Schlagschatten des Polygons, 
so erhalten wir als Ergebnis das Objekt und den Schlag- 
schatten des Objekts. | 

Das abgedruckte Programm (Listing 1) ist als solches 
zwarin sich abgeschlossen und lauffähig, es sollaber auch 
eine Basis für weitere Experimente darstellen. Deshalb 
wurde bewußt auf aufwendige Menüs und »Kosmetik« ver- 
zichtet, weil das alles schließlich wertvollen Speicherplatz 
kostet. Des weiteren ist das ganze Programm in Basic 
geschrieben, so daß eine Adaption auf andere Computer 
keine großen Schwierigkeiten bereiten sollte. 

Zunächst zum Hauptprogramm. Die wichtigsten Varia- 
blen und Felder werden gleich zu Beginn des Programms 
in den Zeilen 80 bis 120 festgelegt. 

- Die Felder POLY__Z(100) und PRIO(100) enthalten Pri- 
orität und den größten Z-Wert der einzelnen Polygone, in 
diesem Fall für maximal 100 Einzelpolygone. 

- Die Felder SX, SY, SZ,X, Y enthalten die Koordinaten der 
Eckpunkte der Schatten und die transformierten Koordi- 
naten der Objekte oder Schattenpolygone. In diesem Fall 
darf jedes Polygon maximal 10 Eckpunkte besitzen. 

- In den Zeilen 100 und 110 befinden sich die Variablen für 
die Bildschirmbegrenzungen. Es sind: 

CLIPXL kleinste X-Koordinate (linker Bildrand) 

CLIPXR größte X-Koordinate (rechter Bildrand) 

CLIPYB kleinste Y-Koordinate (unterer Bildrand) 

CLIPYT größte Y-Koordinate (oberer Bildrand) 
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Im Listing ist die Einstellung eines Atari Grafikstufe 8 
Screen mit 320x192 Punkten vorgegeben. 

In Zeile 120 befinden sich die Koordinaten der Lichtquelle 
(LX,LY,LZ) und die Y-Koordinate der Schattenebene (SP). 

Zur Anpassung an andere Computer ist folgendes zu 
beachten: 

- Die Anpassung an die verschiedenen Bildschirmgrößen 
erfolgt mit den Variablen CLIPXL, CLIPXR, CLIPYB, CLI- 
PYT. Diese sollten in Zeile 100 und 110 entsprechend verän- 
dert werden (zum Beispiel für Schneider oder Atari ST mit 
640*400 Punkten => CLIPXR=639, CLIPYT=399). 

- Sollen mehr als 100 Polygone verwendet werden, müs- 
sen die Feldvariablen POLY__Z und PRIO entsprechend 
dimensioniert werden. 

- Sollen mehr als 10 Eckpunkte pro Polygon verwendet 
werden, müssen die Feldvariablen SX, SY, SZ, X, Y ent- 
sprechend dimensioniert werden. 

In letzteren beiden Fällen muß man den vorhandenen 
Speicherplatz berücksichtigen. 

Die Transformation von Objekt- in Bildschirmkoordinaten 
erfolgt in der Prozedur »CALCSCREEN« in den Zeilen 800 
bis 840. Die Formeln hierzu lauten: 

- Zeile 810 : xc=(xw/2)*(T(OYT(2))-+(xh/2) 

- Zeile 820: ye=(xv/2)*(T(I)/T(2))+(Xv/2), wobei xv=maxi- 
male Y-Koordinate und xh=maximale X-Koordinate ist. 
Die Transformation ist so ausgelegt, daß der Punkt 0,0 in 

der linken unteren Ecke liegt. Bei Computern mit dem 

Ursprung links oben muß der Wert yc noch einmal vom 

maximalen Y-Wert subtrahiert werden, um die korrekte 

Ansicht zu erhalten (siehe Zeile 830). Die transformierten 

Koordinaten befinden sich in den Variablen XC und YC. 
Die diversen GRAPHICS-Befehle im Listing dienen zur 


Umschaltung zwischen dem Grafikmodus mit und ohne 
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Textfenster. Auch diese Anpassung sollte keine Schwierig- 
keiten bereiten. Die Struktur der Prozeduren läßt sich ein- 
fach durch GOSUB und RETURN ersetzen. Gleiches gilt 
für die IF-, ELSE- und ENDIF-Blöcke. Probleme kann es 
allerdings beim UND-Operator in Zeile 3200 geben 
(..CA&CB...). Denn nicht jeder Computer verfügt über diese 
Funktion. 

Zum besseren Verständnis und damit eine eventuelle 
Umsetzung auch gelingt, hier eine Kurzbeschreibung der 
einzelnen Prozeduren. 

- PROC CLRMAÄT (480 bis 560) Löschen der Matrix MA,MB 
oder MC. 

- PROC INITMAT (580 bis 620) Initialisieren der Matrix MA. 
Die Elemente der Hauptdiagonalen werden mit 1 
beschrieben. 

- PROC MULTMAT (640 bis 780) Multiplizieren der Matri- 
zen MA und MB zu MC. 

- PROC GCALCSCREEN (800 bis 840) Transformation der 
dreidimensionalen in zweidimensionale Koordinaten. 

- PROC CALCPOINT (850 bis 930) Multiplizieren einer 
Koordinate T mit der Transformationsmatrix MC. 

- PROC MOVE (950 bis 1030) 

Berechnen der Verschiebematrix MB zur Bewegung des 
Objektes. Ubergabeparameter sind TX,TY und TZ. 

- PROC ROTATE (1050 bis 1300) 

Die Rotationsmatrix. Übergabeparameter sind ACHSE$ 
für die Achse und G in Gradmaß für den Winkel. 

- PROC SCALE (1320 bis 1390) Skalierungsmatrix mit den 
Parametern SX, SY und SZ. Durch Verändern kann das 
Objekt in allen drei Dimensionen gestaucht oder 
gestreckt werden. 

- PROC PERSPECTIVE (1410 bis 1460) Hier erfolgt eine 
perspektivische Anpassung an den Bildschirm. Durch 
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Atari 800 XLM130 


221 8 Baker Street Asylym "Km 
| Gauntlet K.27,% | Cromwell House e 
Gauntlet Desner Dungeons K 14,90 Star Raider [Modul] 
Nercenary Compendium Deutsch K 40,90 Head over Heels 
Leoderboard Golf K77a0 Space Lobster 
| Leaderbard Taurnament K 14,90 | Sprong 
Spindizzy Micro Rythm [Schlagzeug] 
Football Manager Mr. Rober 
The Tail of Brio Lyrae Fields of Fire 
Bowlderdash Il Zone X 
Artet 
Kennedy Approach 
Pisop 
The Eidolon 
| Tomahawk 
Ninjo [Mostertronic] 
The Pown 
] Arkanaid 
Pirfell I und II (Modul) 
Knagts ofıhe Desert 
Miner 2049er 
King Size 30 [50 Programme] 
Night Raiderlhandy Ardvark j 
| Cohans TwersiCosmic Tunnels 
Korons Rift 


Kennedy Approach 


Ka 
24,90 
K240 
K 99 
KM KM 
KOM 
".K9M 
K90 


k 9,90 


Zubehör 


Disketten Preasion 2 Disk, 5,25" 
Dotenreconder Commander 

| Druckerinterface Wiesemonn 72000 

| Abdeckhaube SOOKL 
Abdeschoube T30KL 
Abdeckhaube für Floppy 1050 
Abdeckhaube für Datenrekorder 1910 
Abdeckhaube für Dotenrecorder 

| Commander 
Joystick Qwickshot | 
Joystick Quickshot II Plus [mit Micreschalter 
Joystick Magnum [mit Microschalten] 


10 Stück 

19, 
Weichplastik 9,90 
Weichplastik 9,90 
Weichplastik 9,90 
Weichplastik 9,00 


Weichplosik 9,90 | 


* Sonderangebote solange Vorrat reicht! Versandkosten: bis DM 150,-, 6,- (Nachnahme), 3,50 [Vorauskasse] darüber 
versandkostenfrei, Liste gegen DM 0,80 in Briefmarken 








Verändern der Variablen wird der Fluchtpunkt verscho- 
ben. Am besten mal ausprobieren. 

- PROC CLRT (1480 bis 1520) 

Löschen des T-Feldes. 

- PROC VIEW (1540 bis 1680) 

Erstellung einer Ansicht ohne verdeckte Kanten. 

Wie schon erwähnt, soll das ganze als Experimentierba- 
sis dienen. Außerdem findet sich noch die gesondert abge- 
druckte Prozedur »ANIMATE« (Listing 2). Diese läßt sich mit 
»ENTER ” D1:ANIMATE.LST ”« in das Programm einbinden 
(Achtung: Dabei die Zeilennummern nicht verändern!). Mit 
Hilfe dieser Prozedur kann man Animationssequenzen 
zusammenstellen (Einzelbildaufnahmen). 

Die Ablage der Koordinaten und Polygon-Informationen 
erfolgt in DATA-Zeilen. Diese werden unabhängig vom 
eigentlichen Programm geschrieben und dann als geson- 
dertes File mit »LIST”D1:(NAME).IMG’”« auf Diskette 
gespeichert. Später, nachdem das Hauptprogramm mit 
LOAD geladen wurde, kann das gewünschte Objekt-File 
mit Hilfe des ENTER-Befehls nachgeladen werden. Fol- 
gendes ist zu beachten: 

- Die erste Zeilennummer ist immer 10000, und in dieser 

Zeile befindet sich immer die Anzahl aller Polygone des 

Objektes. 


 - Für jedes Einzelpolygon ist ein »Zehnerblock« vorgese- 


hen, der immer bei ganzen Vielfachen von 10 beginnt 
(Also 10010, 10020, 10030...). 

- In diesen Zeilen befindet sich dann die Anzahl der Eck- 
punkte des Einzelpolygons. 

- Alle weiteren Zeilen enthalten die Koordinaten des Poly- 
gons. Hierbei erfolgt die Numerierung in Einserschritten. 

- Zuletzt sollte noch eine Abschlußzeile eingefügt werden, 
die den Wert O enthält. 

Ein einfaches quadratisches Polygon müßte so defi- 

niert werden: 


1iB REM {CTL GOHXETL_ RYEtCTL R}tCTL R+{CTL_ 


_RY{CTL RITETL eTL E) 

28 REM {SHIFT =} 
iSHIFT =} 

329 REM {SHIFT =} BY THEO JANSSEN 1985/78 

7 <SHIFT =} 

48 REM {CTL_ZYtCETL RItETL R>{CTL RYtCTL 


S3sD GRAFIK PAKET 


RITETL ETL RITCTL EIL CH 
SQ REM 
&8 REM 
78 DIM MA(3,„5> ,MB(3,3) „MC(3,53) 
8ß DIM P(3), 13) ‚„POLY_Z (1998) „PRIO (198) „S 
(10) ‚SY(1@) „SZ (i®) 
4% DIM ACHSES (1) „KOM$ (22) „X(18) ,Yc1@) 
189 ELIPXL=2:CLIPXR=31F 
118 ELIPYB=9B:CLIPYT=1®#1 
128 LX=B:LY=78: LZ=B8: SP=-18 
158 GRAPHICS S:EXEC SET_COL 
148 COLOR 1 
158 EXEC INITMAT 
159 INPUT "command >": KDOM$ 
178 IF KOM$(1,39="VIE" THEN CLS #6:EXEC 
VIEW 
188 IF KömMs(1,99="INI" THEN EXEC INITMAT 
179 IF KOM$(1,3)="PER" THEN EXEC PERSPEC 
TIVE 
288 IF KOMS(1,3)="MOV" 
218 INPUT "X,Y,Z:>"z5AA,AB,AC 
228 TX=AA:TY=AB: TZ=AC 
230 EXEC MOVE 


10020 DATA 4: Ein Quadrat hat bekanntlich 4 Eckpunkte 
10021 DATA X1,Y1,21: Koordinate des 1. Eckpunktes 
10022 DATA X2,Y2,Z2: Koordinate des 2. Eckpunktes 
10023 DATA X3,Y3,23: Koordinate des 3. Eckpunktes 
10024 DATA X4,Y4,24: Koordinate des 4. Eckpunktes 
10030 DATA.....(nächstes Polygon) 

Auf diese Art und Weise ensteht eine bestimmte Ord- 
nung.in der Zeilennumerierung. So würde zum Beispiel 
die Zeilennummer 10232 entsprechend der letzten drei 
Ziffern besagen: 23. Polygon, 2. Eckpunkt. Hierzu finden 
sich auch drei Beispiele abgedruckt (Listing 3 bis 5). 

Die Bedienung des Programms ist recht simpel. Fol- 
gende Kommandos stehen zur Verfügung: 

MOVE, ROTATE, SCALE, VIEW und HIDE. 

Die Parameter X, Y und Z beziehen sich bei den Befeh- 
len MOVE und SCALE auf Koordinaten, beim ROTATE- 
Kommando sind die Winkel für jede Achse einzugeben. 

Eines ist unbedingt zu beachten: Nachdem alle 
Bewegungs- und Rotationskommandos ausgeführt sind, 
muß für die korrekte Darstellung immer die Anpassung- 
sprozedur »PERSPECTIVE« aufgerufen werden. Diese 
gewährleistet die korrekte Positionierung des Flucht- 
punktes. Eine Kommandoeingabe kann so aussehen: 
command: ROTATE (RETURN) :Der Rotationsbefehl 
XY.Y: 10,20,0 (RETURN) :Rotiere 10 Grad über X und 20 
Grad über Y 
command: MOVE (RETURN) :Der Move Befehl 
X,Y,2: 0,0,10 (RETURN) :Bewegung um 10 Einheiten in Z- 
Richtung | 
command: PERSPECTIVE (RETURN) :Perspektivische 
Anpassung 
command: VIEW :Darstellung als Drahtmodell 
command: HIDE :Darstellung mit Schlagschatten und 
verdeckten Kanten. 

(Theo Janssen/rz/hf) 


ENDIF 

IF KOMF(1,3)="ROT" 
2&8 INPUT “X Y,Z: >"sAA,„AB,AC 
278 ACHSE$="X": G=ARSEXEC ROTATE 
282 ACHSE$="Y":G=-AB:EXEC ROTATE 
298 ACHSEF="Z7":G=Abc:EXEC ROTATE 
322 ENDIF 

IF KOM£{1,3)="SCA" 
328 INPUT "X,Y,Z2>"zAA,AB,Ac 
330 Six=AA:SY=ABıSZ=AC 
Ss40 EXEC SCALE 

ENDIF 
358 IF KOM$t1,3)="HID" 
378 GRAPHICS 24 
Ss80 EXEC SET_COL 
372 EXEC HIDDENVIERN 
408 GET KEY 
“12 GRAPHICS 48 
428 EXEC SET_COL 
438 ENDIF 
#48 IF KOM$(1,3)="LIGS" THEN INPUT "NEW.L 
ISHT-FOSITIONS (X, Y, Zi "3 X ,LY,LZ 
459 IF KOM$(1,3)="SHA" THEN INPUT "SHADO 
WiSI -ONLY-HEIGHT: ":5P 

GOTD 168 

PROC ELRMAT 

FOR I=8 TO 3 

FOR J=8 TO 3 

IF MAT=1 THEN MA(J,I?=B 

IF MAT=2 THEN MB(J,„I)=8 

IF MAT=3 THEN MCE(J,I’=8 

NEXT J 

NEXT I 

ENDPROC 

PROC INITMAT 

MAT=1:EXEC CLRMAT 








&BB MA(Q,B)=1:MAl1,1)=1 
618 MA(2,2)=1:MA(3,3)=1 
628 ENDPROC 

438 —- 

6428 PROC MULTMAT 

658 MAT=Z:EXEC CLRMAT 
668 FOR K=8 TO 3 

&78 FOR J=8 TO 3 

FOR I=@ TO 3 

5898 MECI,KI=MC(J,KI+MALI,K)*MB(J,I) 
NEXT I 

7iB NEXT J 

NEXT K 

38 FOR I=2 TO 5 

748 FOR J=0 TO 53 

758 MA(I„J)=MC(I,JD) 

768 NEXT J 

7708 NEXT I 

788 ENDPROC 


958 PROC MOVE 
MAT=2:EXEC CLRMAT 
978 MBE(Q,@)=1:MB(1,1)=1 
988 MB(2,2)=1:MB(3,3)=-1 
998 MB(Q,3)=TX 
MB(1,3)=TY 
MB(2,3)=TZ 

EXEC MULTMAT 


1288 
1818 
1028 
1838 
1248 
1858 
1342 
1078 
1288 
1278 
1128 
1110 
1128 
1138 
1148 





PROC CALESCREEN 
xC=95.5# (TB) /T(239+159.5 
YCc=93.3%# CT (1) /TC22993+95.5 
858 YCE=191-YC 

ENDPRDE 

350 -—— 

PROC CALEFOINT 

87B FOR J=B TO 5 

888 FOR I=2 TO 35 

878 T{J)=T(JI+P{II=MC(J,D 
BB NEXT I 

712 NEXT J 

IF T{Z3<1 THEN T(Z2I=1 
738 ENDPROC 


PROC ROTATE 


MAT=2:EXEC CLRMAT 
IF ACHSES="x" 

MB (8,0)=1:MB(3,3)=1 
MB(1,1)=C0S (6) 
MB(2,1)=-SIN (6) 
MBt1,2)=SIN (6) 
MB(2,2)=C0S (6) 


IF ACHSES="Y" 
MB(1,1)=1:MB(3,3)=1 
MB tQ,2)=C0S (6) 
MB(2,D)=SIN(G) 

MB (B,2)=-SIN (6) 

MB {2,2)=C05S (6) 


IF ACHSES="Z" 
MB(2,2)=1:MB(3,3)=1 
MB (2,2)=C0S (6) 
MB{1,0)=-SIN(6) 
MB(B,1)=SIN(6) 
MB(1,1)=[C0S (6) 


EXEC MULTMAT 


PROC SCALE 
MAT=2:EXEC ECLRMAT 


MB(@,8)=5X 
MB(1,1)=SY 
MB(2,2)=52 
EXEC MULTMAT 





141B PROC PERSPECTIVE 
1428 MAT=2:EXEC ELRMAT 
1438 MB(QO,B)=4:MB(1,1)=4 
1442 MB(2,2)=1:MB (3,3) =1 
1458 EXEC MULTMAT 

14508 ENDPRÜOC 

1470 — 

14520 PROC CLRT 

1498 FOR I=B TO 5 

1598 T(I)=B 

1518 NEXT I 

1528 ENDPFROC 

i33B -—- 

1548 PROC VIEN 

1558 RESTORE (18090) 
15620 READ F_NUMBER 

1578 FOR kKk=1 TD F_NUMBER 
1588 READ E_NUMBER,XP,YP,ZP 
1570 XA=XP:ıYA=YP: ZA=ZP 
1588 FOR L=2 TOD E_NUMBER 
1518 READ XL,YL„ZL 

152B EXEC SHOWLINE 

1838 XP=XL:YP=YL: ZP=7L 
1548 NEXT 1 

185598 XL=iA:YL=YA: ZL=ZA 
isAD EXEC SHOWLINE 

1878 NEXT K 

1588 ENDPROE 

1599 — 

17988 PROC SORTFOLY 

1718 RESTORE (189888) 
1728 READ P_NUMBER 

1738 FÜR R=1 TO P_NUMBER 
1748 POLY_Z(RI=2 

1758 NEXT R 

17&B8 TEXT 28,188, "sorting„.Polygansaı " 
1778 FOR R=1 TO F_NUMBER 
17880 TEXT 152,1B8,R 

1778 ZGES=2 

1888 READ E_NUMBER 

iSsiB FOR 5=1 TO E_NUMBER 
1928 READ X,Y,Z 

1838 PiB})=X:P(i1)=YıP(2)=Z:P(F)=1 
1848 EXEC CLRT 

1858 EXEC CALCPOINT 

1858 ZGES=-ZGES+T (2) 

1878 IF TiZI>FOLY_Z(RD 
1888 POLY_Z(RI=T(2) 

1898 ENDIF 

1788 NEXT 5 

i912 ZMIT=ZGES/E_NUMBER 
1928 POLY_ZtRI=POLY_Z (RI +ZMIT 
1739 NEXT R 

1748 FOR R=1i TO P_NUMBER 
1958 PRIO<RI=1 

1958 NEXT R 

1978 FOR S=1 TO F_NUMBER 
19782 W=1 

1998 FOR R=1 TOD P_NUMBER 
2898 IF (POLY_ZCRI >=POLY_ZiW)) THEN W=R 
2818 NEXT R 

229280 PRIO(SI=W 

2838 FOLY_Z(WI =-IE-28 
2848 NEXT 5 


2858 ENDPROC 


2042 — 

2978 PROC HIDDENVIENW 

2088 EXEC SORTPOLY 

2098 CLS #6 

2108 RESTORE (10909) 

211@ READ P_NUMBER 

2128 FOR Q=1 TO P_NUMBER 

2138@ RESTORE (18@2@+(PRIO(0)*1B)) 
2148 READ E_NUMBER 

2158 FOR S=1 TO E_NUMBER 

2168 READ X,Y,Z 

2170 PIM=X:P(1)=YsP(2I=Z:P(Z)=1 
2188 EXEC CLRT 

2198 EXEC CALCPOINT 

2200 EXEC CALCSHADOW 


Listing 1. »3D-Grafik« 








2218 EXEC CALCSCREEN 3218 ENDIF <SL> 


2228 X(SI=XC:Y(S)=YC 32828 IF Y<CLIPYE <VJ> 
2238 NEXT S 3838 C=C+2 <HS> 
2240 FÜR S=1 TO E_NUMBER 35848 ELSE <TI> 
2258 T=S+1 3058 IF Y>CLIPYT <HO> 
2260 IF T>E_NUMBER THEN T=1 3958 C=C+1 <HR> 
2278 XH=X (5) :YH=Y(S) 3870 ENDIF <TD> 
2288 XJ=X(T):YI=Y(T) 3288 ENDIF <TG> 
2298 EL=B:EXEC DDA 38728 ENDPROC <PF> 
2388 NEXT 5 zia0 —- <VI> 
2318 FOR S=1 TO E_NUMBER Z112 PROC CLIP <IH> 
2328 T=S+1 31298 vIS=1 <AB> 
2338 IF T>E_NUMBER THEN T=1 3132 X=XFıY=YF <XH> 
2348 XF=X(5):ıYF=Y(S) 3149 EXEC CODE <XP> 
23598 X6=X(T)ıYG=Y(T) 3152 CA=C <HI> 
23648 COLOR i Z16D X=-XG:Y=Y6G <YrT> 
2378 EXEC CLIP 3170 EXEC CODE <XY> 
2388 IF VIS 3188 CB=C <HY> 
2398 PLOT XF,YF:DRAWTO X6,Y6 3198 WHILE (CA<>B) OR (CB<>B) <XQ> 
2400 ENDIF 3288 IF tCA&ECBI<>B THEN LET VIS=B:ENDPRO 

2410 NEXT S C <HT> 
2428 EXEC PLOTSHADOW 3218 C=CA:CZ=CA | <KH> 
2438 NEXT O 3228 IF C=2 THEN LET C=CB:C7=CB <XX> 
24498 ENDPROC 32508 IF {C/8)>=1 <PJ> 
2458 ——- 3240 Y=YF+tYE-YF)#CCLIPXL-XF) / CXG-XF) <BY> 
24508 PROC DDA 3250 X=CLIPXL <PR> 
2478 LENGTH=ABS (XJ-XH) 3250 C=C-8 <LF> 
24808 IF ABStYJI-YH) >LENSTH THEN LENGSTH=AB 3278 ENDIF <TH> 
S(YJ-YH) 3288 IF (C/8) >=8.5 <EC> 
24998 XINC=(XJ-XH) /LENGTH 32928 Y=YF+(YG-YFI8#CCLIPXR-XF) 7 CXG-XF) <IH> 
25808 YINC=(YJ-YH) /LENSTH S5B2 X=CLIPXR <SE> 
2518 XD=XH+8.5: YD=YH+0.5 3318 C=t-4 <JE> 
2528 FOR POINT=1 TO LENSTH 3328 ENDIF <5U> 
253@ FOR N=1 TO E_NUM 3354 IF (0/8) >=0.25 <06> 
2548 COLOR CL 3348 X=XF+CXG-XF)&#CCLIPYB-YF)I /CYE-YF) <VI> 
2550 XF=XD: YF=YD: XG=X (N) : YG=Y (N) 3358 Y=CLIPYB SLE> 
2568 EXEC CLIP 3358 C=b-2 <IZ> 
2570 IF VIS 3372 ENDIF <TJ> 
2588 PLOT XF,YF 3388 IF (6/8) >=9.125 <AS> 
2378 DRAWTOD X6,Y6G 3398 X=XF+CX5-XF}I8#CCLIPYT-YF)/CYE-YF) <NG> 
2688 PLOT INT(XF) ,INT(YF) 34028 Y=CLIPYT <TY> 
26518 DRAWTO X6,Y6G 3418 C=C-1 <ICc> 
2628 ENDIF 3420 ENDIF <SH> 
26308 NEXT N 5438 IF C7=Ca <JZ> 
2448 XD=XD+XINcC 3448 XF=XıYF=Y:ıEXEC CODE <EF> 
2650 YD=YD+YINC 3458 CA=C <HO> 
2568 NEXT POINT 34640 ELSE <TH> 
2678 ENDPROC 3479 XG=X:YG=Y:ıEXEC CODE <FH> 
2638 — 3488 CB=C <XE> 
2698 PROC SHOWLINE 3498 ENDIF <TR> 
2788 EXEC ELRT 3500 WEND <TQ> 
2718 PiB)=XP:P{1)=YP:ıP (?2)=ZP:P(F3)=1 3518 ENDPROC <OR> 
2720 EXEC CALCPOINT 3528 — <VH> 
2730 EXEC CALCSCREEN 3538 PROC CALCSHADOW <SR> 
2748 XF=XC:YF=YC 3548 SX(S5)=LX-T(B) <XF> 
2758 EXEC CLRT 3558 SYtS)=LY-T ti) <YT> 
2758 FiB)=XL:Pii)=YL:P(23=ZL:ıP (3)=1 35480 57 (SI) =L7-T (2?) <AHR> 
2770 EXEC CALCPOINT 3578 SKALAR=- (tLY+(-SP)) /5Yt5)) <I> 
2788 EXEC CALCSCREEN 3588 SX (5) =LX+SX (5) *SKALAR <UI> 
27998 XG=XC:YG=YC 3598 SY(S)I=SPp <HF> 
2888 EXEC CLIP 3600 SZ (SI=LZ+SZ (5) =SKALAR <HG> 
2sıa IF vis 36198 ENDPROC <0T> 
2829 PLOT XF,YF SE20 — <VrY> 
28328 DRAWTO XG,YG 3638 PROC PLOTSHADOW <NZ> 
2840 ENDIF 3648 FOR S=1 TO E_NUMBER <OH> 
28528 ENDPROC 356558 T(D)=SXISI):Tt1)=SY5) <IB> 
28488 — 3Eäd TI2I=SZ(HI:T(FI=1 <FY> 
2878 PROC SET_COL 5678 EXEC CALCSCREEN <IS> 
2888 SETCOLOR 2,8,12 36588 XtS)=XC:Y(SI=YC <FG> 
2898 SETCOLOR 4,80,12 3699 NEXT 5 <KK> 
2988 SETCOLOR 1,8,8 37082 FOR S=1 TO E_NUMBER <NX> 
2918 ENDPROC 3718 T=5+1 <aH> 
2920 —- 3728 IF T>E_NUMBER THEN T=i <CcL> 
29538 PROC CODE 3738 XH=X (5) :YH=Y(S) <YB> 
29748 C=D 3740 XJ=XtT)zYJ=Y(T) <BA> 
2958 IF X<CLIPXL 3758 CL=1:EXEC DDA <TZ> 
29768 C=8 3760 NEXT S <KD> 
2770 ELSE 3770 ENDPROC <PN> 
2988 IF X>CLIPXR Tao <HSH 
29599 C=4 

5888 ENDIF Listing 1. »3D-Grafik« (Schluß) 





92 








sBo2 
SB18 
3220 


120 
5138 
S148 
s1S58 
S1&8 


10200 
10010 
10011 
12212 
120813 
122814 
12020 
12821 
12022 
10923 
199024 
10030 
120531 
12032 
10053 
120234 
12849 


12028 
18818 
ı1a911 

12912 
18815 
10814 
12928 
10021 

12022 
12023 
123924 
12330 
12851 

12252 
138535 
12308354 
123948 
15041 

12042 
139453 
19944 
12950 
10951 

18252 
19953 
123954 
10058 
10051 
12052 
120553 
120954 
12970 
12071 


455 IF KOM$(1,3>="ANI" THEN EXEE ANIMATE 


PROC ANIMATE 


BRAPHICS B:EXEC SET_COL 

PRINT "STARTFOSITIDN" 

INPUT "Winkels (x,y,z)":X_WS,Y_WS,Z_ 
INPUT "Position. [x ,„y,21"5X_ PS,Y_PS, 


PRINT :PRINT :PRINT "ENDFOSITION" 
INPUT "Winkels (x,y,z’":X_WE,Y_WE,„Z_ 


INPUT "Position. (x ,„y,zI":X_PE,.Y_PE, 


PRINT :PRINT :PRINT 
INPUT "in„welchem„Zeitraum. (sec.)"; 


GRAPHICS 2Z4:EXEC SET_COL 


STEF=T1I*25 


WMX=CX_WE-X_WS)/STEP 
WMY=(Y_WE-Y_WS) /STEP 
WMZ=(Z_WE-Z_WS) /STEP 
PMX=(X_PE-X_PS) /STEP 
PMY=(Y_PE-Y_PSI/STEP 


DATA4& 
DATA4A 
DATA2-1,1,-1 
DATAs1,1,—1 
DATA41,-1,-1 


DATAs-1,-—1,—1 


DATALA 
DATA-1,1,1 
DATAS—-1,1,1 
DATAL-1,—1,1 
DATA1,—1,1 
DATA=4 
DATA4-1,1,1 
DATA-1,1,-1 


DATA2-1,-1,—1 


DATAs-1,-1,1 
DATAsA4 


DATA19 
DATAsS 
DATA4-1,1,—1 
DATAs1,1,-1 
DATAA1,—1,—1 


DATAsA4 
DATAsi1,1,1 
DATAx-1,1,1 
DATA=-1,-1,1 
DATA1,—1,1 
DATA-A 
DATAs-1,1,1 
DATA4-1,1,—1 


DATA4-1,-1,—1 


DATA--1,-1,1 
DATA4 
DATAL1,1,-1 
DATAs1,1,1 
DATA=1 „-i y 1 
DATA21,-1,—1 
DATA4 
DATAs-1,1,1 
DATAa1,1,1 
DATA41,1,—1 
DATA4-1,1,—1 
DATA4 
DATA1,-1,1 
DATA -1,—1,1 


BATA„-1,-1,-1 


DATA1,„71,71 
DATAsA4 
DATA42,8,2 
DATA-4,2,2 





3178 
1889 
5178 
208 
3218 
5228 
3230 
Ss242 
Sud 
S2z48 


5278 


=280 
290 
308 
5512 
3328 
2352 
2348 
Iso 
S33568 
33578 


Listing 2. »ANIMATE.LST« 


12041 
10942 
129453 
123944 
123258 
12251 
13952 
123953 
12954 
12958 
12061 
12852 
12053 
120954 
22008 





PMZ=tZ_PE-Z_PS) /STEP 
FOR BILD=2 TO STEP 


























EXEC INITMAT <UG> 
G=X_WS: ACHSEF="X":EXEC ROTATE <NE> 
G=Y_WS+ ACHSES="Y"EXEC ROTATE <OK> 
G=Z_WS: ACHSE$="Z"=2EXEC ROTATE <PQ> 
TX=X_PS: TY=Y_PS: TZ=Z_PS <VO> 
EXEC MOVE <KZ> 
EXEC PERSPECTIVE <PC> 
EXEC HIDDENVIEW <HS> 
GET KEY <aU> 
X_WS=X_WS+HWMX <PQ@> 
Y_WS=Y_WS+WMY <RC> 
Z_WS=Z_WS+WMZ <RM> 
X_PS=X_PS+PMX XEY> 
Y_PS=Y_PS+PMY <GK> 
Z_PS=Z_PS+PMZ <H#> 
CLS #6 <EJ> 
NEXT BILD <CX> 
ENDPROC <PE> 
__ <HI> 











DATA41,1,-1 
DATAs1,1,1 
DATA41,—1,1 
DATAA1,-1,—1 
DATALA 
DATAs-1,1,1 
BATAs1;1,1 
DATAA1,1,—1 
DATA-1,1,—1 
DATAA 
DATA-1,-1,1 
DATAs-1,—1,1 
DATAL-1,-1,—1 
DATAx1,-1,—1 
DATA-O 


Listing 3. »‚WUERFEL.IMG« 


122073 
12074 
i2288 
12281 
1230832 
129853 
13872 
12071 
12972 
128973 
123128 
18181 
12182 
12183 
128110 
1Q1i1 
18112 
128113 
10128 
18121 
18122 
19123 
121308 
14151 
19132 


DATA4,0,4 
DATAx2,8,4 
DATA«S 
DATA-2,0,2 
DATA3,2,3 
DATA.4,0,2 
DATA«S 
DATA-2,0,4 
DATA.S,2,3 
DATA4,0,4 
DATA4S 
DATA.2,9,2 
DATA3,2,3 
DATA-2,2,4 
DATA 
DATA-4,0,2 
DATA-3,2,3 
DATA4,0,4 
DATA-S 

DATA -2,8,-2 
DATA -3,2,—3 
DATA-4,0,—2 
DATA.3 
DATA-2,0,—4 
DATA4-3,2,-3 


123135 DATA-4,0,—4 


123148 
128141 
18142 
128143 
18158 
18151 


DATA4S 
DATA4-2,0,-2 
DATAX-3,2,—3 
DATA--2,8,-4 
DATA=S 
DATA2-4,8,-2 


Listing 4. »KOERPER.IMG« 











18152 
18153 
182158 
1B1&1 


12182 
12155 
18178 
18171 
18172 
12175 
12198 


12000 
19818 
12211 

10812 
18215 
18914 
12928 
10221 

12022 
19023 
10024 
10358 
12031 

19932 
123355 
130534 
19048 
10041 

123942 
129843 
109044 
12958 
19951 
19952 
120553 
19954 
13948 
12961 

120852 
10945 
12954 
129978 
10071 
12972 
183873 
10974 
10938 
ia081 

12082 
12285 
12484 
129070 
15071 
12392 
13895 
180974 
123188 
12101 

18182 
18183 
18104 
183118 
12111 
i@112 
1281135 
19114 
13128 
19121 

123122 
18125 
183124 
181358 
18131 

18132 
18133 
18134 
123148 
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DATAA-3,2,—3 
DATA-4,0,—4 
DATA«S 

DATA--2,0,-2 
DATAS- 3.2.5 
DATA--4,0,-2 
DATA3 

DATAx-2,0,—4 
DATA -3,-2,-3 
DATA--4,0,—4 
DATAA3 


DATA-2S 

DATA=4 

DATA —. ee | = Aue 2 
DATA -.2,1.4,--2 
DATAx.2,1.4,—.2 
DATA». 2,-1.4,—. 2 
DATA4 
DATA-.2,-1.4,.2 
DATA--.2,1.4,.2 
DATA=.2,1.4,.2 
DATA. 2,-1.4,.2 
DATA4 
DATA--.2,-1.4,-.2 
DATA. 2,-1.4,—.2 
DATA. 2,-1.4,.2 
DATA@-.2,-1.4,-2 
DATA=4 
DATA4-.2,1.4,—. 2 
DATA... 2,1.4,—.2 
DATA2. 2,1, 4,2 
DATA--.2,1.4,.2 
DATA4 
DATA=-.2,-1.4,.2 
DATA. -.2,1.4,.2 
DATAs-.2,1.4,—.2 
DATA--.2,-1.4,—- 2 
DATA4 

DATA. 2,71. 4,.2 
DATA». 2,1.4,.2 
DATA. 2,1.4,-.2 
DATA. 2,-1.4,—. 2 
DATA=4 
DATA-.8,1.4,—.2 
DATA“ -.4,1.4,—.2 
DATA. 4,7. 2,—.2 
DATA -.B,-- 2,—.2 
DATA-4 
DATAA-.8,1.4,.2 
DATAx-.4,1.4,.2 
DATA —.4,—.2,.2 
DATAA-.8,-. 25.2 
DATA=4 
DATAs-.8,1.4,—.2 
DATAx-.8,1.4,.2 
DATA. 4,1.4,.2 
DATA2-.4,1.4,-.2 
DATA=4 
DATA«-.4,1.4,-. 2 
DATA—.4,1.4,.2 
DATA-.4,—.2,.2 
DATA. 4,-—. eh 2 
DATA=4 
DATA2-.8,1.4,-.2 
DATAı-.B, i» 4. 2 
DATA=-.8,—. 2,.2 
DATA -.8,-. 2,2 
DATA4 

DATA=.8, in ne = 
DATA-.4,1.4,—.2 
DATA2.4,-.2,—.2 
DATA-.8,--2,—.2 
DATA4 
DATA..8,1.4,.2 
DATA».4,1.4,.2 
DATAx.4,—. 2,.2 
DATAx.8,-.2,.2 
DATAzA 





DATA<-2,8,-2 
DATA-3,-2,-3 


' DATA -2,80,-4 


Listing 4. »KOERPER.IMG« (Schluß) 


12141 

13142 
12143 
13144 
18158 
13151 
19152 
13153 
19154 
18158 
12151 

18182 
121853 
19154 
12170 
18171 
18172 
123173 
19174 
18180 
18181 
12182 
10183 
13184 
iBirE 
18171 
12172 
19175 
181974 
10228 
18201 

193282 
12203 
19284 
18218 
ıuZz11 
19212 
10213 
18214 
12228 
18221 

10222 
19225 
19224 
18258 
19231 
19252 


. 18255 


182534 
13248 
19241 
18242 
19245 
192744 
12250 
18251 
19252 
132553 
10254 
12250 
10251 
10262 
192553 
19254 
Pine) 


DATA=S 
DATA.—4 7 [% L) zen 
DATAU-3,-2,—3 
DATAA—4,8,—4 
DATALB 


DATA-.8,1-4,-.2 
DATA. 8,1. 4,.2 
DATAL.4,1.4,.2 
DATA..4,1.4,—.2 
DATA4 
DATAn.4,1.4,.-.2 
DATA2.4,1.4,-2 
DATAL.4,—.2,.2 
DATA=.4,—. 2,-.2 
DATA-4 
DATAs.8,1.4,—. 2 
DATA-.8,1.4,-2 
DATAı-8,—.2,.2 
DATA». 8,—. 2,—.2 
DATA=4 
DATA--8,--2,-—-2 
DATAS— 4,22 
DATAL-1.2. 1.4.2 
DATA4-1.8,-1.4,-.2 
DATAı4 
DATAn—.8,-- 2,2 
DATAS-,4,—;2,,2 
DATA4-1.2,-1.4,-2 
DATA--1.8,-1.4,.2 
DATA4 
DATAA-.8,-.2,.2 
DATA4-1.8,-1.4,.2 
DATA--1.8,-1.4,-. 2 
DATAs-.8,--2,=-.2 
DATAA4 
DATA. 4,7. 2.2 
DATA--1.2,-1.4,-2 
DATA4-1.2,-1.4,—. 2 
DATA. 4,—.2,—.2 
DATA4 
DATA4-1.8,-1.4,—. 2 
DATAA-1.2,-1.4,—. 2 
DATA--1.2,-1.4,.2 
DATA-1.8,-1.4,.2 
DATA=4 
DATA-.8,7r-2,—.2 
DATA..4.-.2,-—2 
DATA,„1.2,-1.4,—. 2 
DATAL1-8.-1.4,-.2 
DATA=4 
DATAx.8,--2,.2 
DATAA.4,—.2,.2 
DATAs1.2,-1.4,.2 
DATA.1.8,-1-.4,:2 
DATA,4 
DATAL-3,-:2,.2 
DATA-1.8,-1.4,.2 
DATA41.8,-1.4,—.2 
DATA-.8,—. 2,— 2 
DATA„4 
DATAx.4,-.2,.2 
DATA1.2,.-1.4,.2 
DATAA1.2,-1.4,-.2 
DATA2.4,-.2,—2 
DATA„4 
DATA1.8,-1.4,—.2 
DAIS.1.2.- 1.8. .> 
DATA41.2,-1.4,.2 
DATAL1.B,-1.4,:2 
DATA 


Listing 5. »LOGO.IMG« 














Benutzerfreundliche 
Programme 





Um ein Programm benutzerfreundlich zu gestal- 
ten, bedarf es viel Zeit. Zeit, die eigentlich besser 
genutzt werden könnte. Mit unserem Programm 
sparen Sie diese Zeit, denn Menüsteuerungen 
sind damit spielend leicht programmierbar. 


aben Sie schon einmal versucht, ein Programm 
möglichst benutzerfreundlich zu gestalten? Nor- 
malerweise geschieht dies über Menüs, die vom 
Anwender abgerufen werden und ihm die jeweilige aufge- 
rufene Funktion erklären. Schön und gut. Nur, bis man sein 
Programm miteinem Menü versehen hat, vergeht meistens 
nochmal die gleiche Zeit wie bei der Entwicklung des 
gesamten Programms. 





‚Prosnammiere 

ri 
TE sepastianelli 

| 92737. 


Kurzbeschre ibung: 


Mit Hilfe dieses. Prosr apmz koennen 
54 mit einem Fuli-Sereen-Editor 
BASIC-Code fiber Bildschirmwsasken 
generieren. 


File Name: B Memory: BC48 


Minimum Gode: H 





Das »Screen-Definition-Utility« läßt sich in Programme ein- 
binden und erzeugt Bildschirmmasken mit allen Abfragen 


Um Ihnen die Arbeit bei der Gestaltung von Menüs zu 
erleichtern, haben wir das »Screen-Definition-Utility« veröf- 
fentlicht, mit dem sich einfach und komfortabel eine kom- 
plette Bildschirmmaske aufbauen läßt. In diese lassen sich 
an beliebiger Stelle Abfragen nach Zahlen oder Zeichen- 
ketten einbauen. Anschließend schreibt unser Programm 
verschiedene Files auf Diskette, die in eigene Programme 
einbindbar sind und die die Bildschirmmaske mit allen 
Abfragen erzeugen. 


»SDU« für meisterhafte Menüs 


Das Programm ist in Turbo-Basic geschrieben (Listing 1). 
Es benötigt noch ein weiteres File. Dieses ist als AMPEL- 
Listing abgedruckt (Listing 2) und muß aufder gleichen Dis- 
kette wie das Screen-Definition-Utility unter dem Namen 
»5DU« vorhanden sein. 

Nach dem Starten des Programms werden Sie nach dem 
Filenamen gefragt, unter dem die einzelnen von Screen- 
Definition-Utility erzeugten Files abgelegt werden. Geben 
Sie bitte keine Extension an, da das Programm mehrere 
Files mit dem angegebenen Namen erzeugt, zur Unter- 
scheidung aber jeweils eine andere Extension einsetzt. 














Anschließend fragt das Programm, ob das erzeugte 
Basic-Programm in kurzer oder langer Form gespeichert 
werden soll. Bei der langen Form wird aus jeder Zeichen- 
folge, die zwischen zwei Leerzeichen steht, ein eigener 
Print-Befehl erzeugt, die kurze Fassung verwandelt jede 
A40-Zeichen-Zeile vom Bildschirm in einen Print-Befehl. 

Memory fragt nach der hexadezimalen Adresse, ab 
der Screen-Definition-Utility ein Maschinensprache-Pro- 
gramm erzeugt, das dann in eigenen Programme einge- 
bunden wird. Dieses Maschinenprogramm lädt eine vorge- 
fertigte Eingabemaske von der Diskette. Die Adresse muß 
zwischen $9000 und $CC40 liegen. Drücken Sie hier ein- 
fach nur <RETURN >, wird die Adresse $BC40 angenom- 
men. 

Schließlich folgt die Frage nach dem Mark-Zeichen. Mit 
diesem Zeichen markieren Sie in der Eingabemaske Stel- 
len, an der Ihr späteres Programm eine Eingabe fordern 
soll. Dieses Zeichen ist normalerweise das <@ >-Zeichen 
(Klammeraffe, Affenschaukel, wie auch immer), Sie kön- 
nen jedoch jedes beliebige andere Zeichen dafür definie- 
ren. 


Beliebige Abfragepositionen 


Nach dieser Eingabe gelangen Sie in den Editor, mit dem 
sich Eingabemasken konstruieren lassen. Falls auf der Dis- 
kette schon eine Maske unter dem im Eingangsmenü ein- 
gegebenen Namen vorhanden ist, wird diese automatisch 
geladen. Mit dem Cursor lassen sich an verschiedenen 
Stellen Zeichen setzen. Versehentlich gesetzte Zeichen 
löschen Sie wieder mit der <SPACE >-Taste. Eine ganze 
Zeile wird mit der Tastenkombination <SHIFT> und 
<DELETE> gelöscht, und folgende Zeilen werden nach- 
gerückt. Die Bildschirmposition in der rechten untersten 
Ecke kann nicht belegt werden, da der Bildschirminhalt 
sonst eine Zeile nach oben rücken würde und damit der 
Bildschirmaufbau zerstört würde. Mit <ESC> verläßt man 
den Editor. Steht der Cursor beim Drücken von <ESC> in 
der obersten linken Ecke, werden die folgenden beiden 
Programmmteile nicht ausgeführt, und man befindet sich 
sofort im »Order«-Programm. 

Steht der Cursor jedoch beim Verlassen des Editors an 
einer anderen Position, wird die Maske auf der Diskette 
gespeichert und anschließend die »Searching«-Routine 
aufgerufen. Diese durchsucht die Maske nach im Editor 
eingebenen Mark-Zeichen. Findet die Search-Routine ein 
Mark, so fragt sie nach dem Variablennamen, den 
sie der an dieser Stelle eingebenen Zeichenfolge oder Zahl 
geben soll. 

Sind alle Marks gefunden und der ganze Bildschirm 
durchsucht, wird die Order-Routine aufgerufen. Mit dieser 
legt man die Reihenfolge fest, in der die einzelnen Äbfra- 
gen auf dem Bildschirm erscheinen sollen. Drücken Sie 
gleich zu Anfang <ESC> und wurde vorher die 
Searching-Routine nicht aufgerufen, so wird die Einstel- 
lung von einer vorher vorhandenen Maske übernommen 
und gleich der nächste Programmteil angesprungen. 
Ansonsten steht der Cursor auf der ersten Eingabe. Wollen 
Sie, daß diese Marke nicht als erstes in Ihrem Programm 
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abgefragt wird, springen Sie mit <+> oder <*> die 
nächste Marke an. Mit <RETURN> wird dann die Marke 
als nächstes in der Abfragereihenfolge festgelegt. Mit 
<ESC> löschen Sie eine komplette Abfragereihenfolge. 

Ist die komplette Abfragereihenfolge der Marken gespei- 
chert, so springt das Programm schließlich in das 
Generate-Menü. Hier werden Sie nach der ersten Zeilen- 
nummer gefragt, unter der die Eingabemaske in Ihrem Pro- 
gramm stehen soll, sowie nach dem Abstand der Zeilen- 
nummern. Anschließend wird das Eingabemasken-Pro- 
gramm auf Diskette gespeichert. 

Auflhrer Diskette stehen dann insgesamt sechs Files, die 
das Eingabemaskenprogramm benötigt. Um die Maske in 
Ihr Programm einzubinden, geben Sie die Befehle»ENTER 


12 POKE 184,191 

28 DIM PIC_NAME$ (15) „BAS_NAME$ (15) „MEM_N 
AME$ (15) „EXT_NAMES (15) „INP_NAMES$ (15) „ASM 
_NAME$ (15) „NAMES (11) 

38 DIM Z(88,43) ,A$ (40) „KEY$ (41) „KEY1F(12 
) 


<KO> 


<HG> 


<ZA> 
48 KEY$="$(,)8123454789ABEDEFGHIJKLMNDPO 
RSTUVWAYZ_" 

s8 KEYIS="{ESC DEL}YTESC CTL <YHiIESC CTL > 
+1ESC SHIFT >+£ESC CTL BDELYtESC SHIFT DE 
LIXESE ECTL +3TESE CTL #31ESC CTL -+{ESC 


SLR? 





ETL =}ItESC ESC}-" <JQ> 
68 FOKE 82,8 <6c> 
78 FOR I=@ TO 8 <CK> 
82 READ As <Ky> 
72 FOR J=8 TO 19 <Lv> 
100 POKE $0609+J+I1*28,ASC (A$(J+1)) <BH> 
118 NEXT J <6D> 
120 NEXT I <FV> 
138 GRAPHICS 8 <SH> 
149 DL=DPEEK (568) <AK> 
158 POKE DL-2,112 <IL> 
168 POKE DL-1,78 <FE> 
178 POKE DL+2,112 <IR> 
188 DPOKE 568,DL-2 <IV> 
198 BILD=DPEEK (88) <IB> 
200 # MENUE <FB> 
210 CLS <AU> 
220 POKE 752,8 <IH> 
239 POKE 729,40 <oT> 
240 POKE 738,5 <IYr> 
258 DPOKE DL,sB6R0+168 <SR> 
2689 CLOSE #1 <LK> 
278 POSITION 16,18 <DB> 
288 PUT 158 <PF> 
298 I=LEN(NAME$) +1 <LR> 
300 TRAP #ERROR <DT> 
318 DPEN #1,4,8,"D:SDU" <HY> 
328 BGET #1,BILD,957 <HE> 
330 CLOSE #1 <LF> 
348 PUT 158 <oY> 
358 NAMEF="D:" <I> 
368 I=2 <GE> 
378 REPEAT <DH> 
388 I=I+1 <QaS> 
398 REPEAT <Da> 
400 # INPUT_NAME <KP> 
418 POKE 792,64 <NZ> 
428 FOKE 694,08 <LE> 
438 TRAP #INPUT_NAME:GBET KEY <aV> 
488 IF I=3 <OH> 
458 OK=INSTR(KEY$,CHR$ (KEY) „14) <ZS> 
468 ELSE <Yc> 
478 OK=INSTR(KEY$,„CHR$ (KEY) ‚4) <Ta> 
488 ENDIF <vI> 
498 IF KEY=126 AND I>3 <HR> 
soQ I=I-1 <au> 
512 PUT KEY <RX> 
528 ENDIF <uY> 
538 UNTIL OK>@ OR KEY=155 AND I>3 <BE> 
548 PUT KEY <SD> 





"D:Filename.BAS”« sowie ENTER ”D:Filename.INP”« 
ein. In Ihrem Programm muß dann am Anfang noch der 
Befehl »BLOAD ”D:Filename.ASM”« vorkommen. Jetzt 
wird die definierte Eingabemaske ohne Probleme geladen 
und ausgeführt. 


(Daniel Sebastianelli/hf) 






Steckbrief 
Screen-Definition-Utility 
| Turbo-Basic 


Prüfsumme und AMPEL 


















Programm: 


Sprache: 
Eingabehilfe: 
Datenträger: 





558 IF KEY<>155 THEN NAME$S(I)=SCHRSIKEY) <P6G> 
568 UNTIL I=18 OR KEY=155 <HO> 
578 NAME$=NAME$ (1,I-1) <NK> 
588 POSITION 18,28 <YJ> 
592 PUT 78 <ur> 
600 REPEAT <DB> 
610 # INPUT_MIN_CODE <YK> 
620 POKE 782,64 <0D> 
630 POKE 694,0 <LI> 
648 TRAP #INFUT_MIN_CODE:GET MIN_CODE <GZ> 
658 UNTIL MIN_CODE=74 OR MIN_CODE=78 OR 
MIN_CODE=155 <XI> 
668 IF MIN_CODE=155 THEN MIN_CODE=78 <KP> 
678 POSITION 16,28 <YI> 
#80 PUT MIN_CODE <7a> 
670 MEMORY=48192 <LE> 
709 A$="BCLaR" <AT> 
7ı@8 POSITION 33,18 <cD> 
2a ? As <HN> 
739 POSITION 33,18 <CcH> 
740 PUT 158 <PC> 
758 1=8 <FS> 
768 REPEAT <DO> 
778 I=I+1 <Qau > 
788 REPEAT <DS> 
7970 # INPUT_MEMORY <EL> 
ga POKE 792,64 <0B> 
812 POKE 694,8 <L6> 
829 TRAP #INPUT_MEMORY:GET KEY <VI> 
838 HEX=INSTR (KEYS (5,28) „CHR& (KEY) ) <CH> 
848 IF KEY=126 AND I>1 <UT> 
858 I=I-1 <RH> 
860 FUT KEY <SK> 
870 ELSE <YI> 
880 IF I=1 <DE> 
BIO 7 "aaa" <ED> 
700 POSITIDN 33,18 <cD> 
918 PUT 158 <or> 
928 ENDIF <rc> 
738 ENDIF <VE> 
948 UNTIL HEX>® OR KEY=155 AND I=1 <FR> 
958 FUT KEY <sy> | 
F6B AS(II=CHRSCKEY) <UK> | 
2778 UNTIL KEY=1S5 AND I=1 OR I=4 <OB> 
980 IF I=4 <PJ> 
790 MEMORY=DEC (A$ (1,4) <ID> 
1098 MEMORY= (MEMORY+36864+ABS (MEMORY-368 
64))/2 <SL> 
1B1B MEMORY= (MEMORY+52288-ABS (MEMORY-S522 

88) ) 72 <aH> 
1022 ENDIF SSH > 
1058 POSITION 33,18 <TH> 
1042 7 HEX$ (MEMORY) <HT> 
12850 MARK=54 <AA> 
1240 POSITION 33,282 <PB> 
127@ PUT MARK <CE> 
1B80 REPEAT <EX> 
1299 REPEAT <FA> 
1122 # INPUT_MARK <GJ> 
1118 POKE 702,64 <VD> 
1128 POKE 694,8 <QH > 








1558 


1512 


TRAP #INPUT_MARK:GET KEY 
OK=INSTR (KEY$ (5,48) „CHR$ (KEY) ) 
OK1=INSTR (KEY1$,CHR$(KEY)) 
UNTIL OK=@ AND OKi=8 OR KEY=155 
IF KEY<>155 THEN MARK=KEY 


| POSITION 33,20 
PUT MARK 


UNTIL KEY=155 
MARK=PEEK (BILD+833) 
POKE 729,18 

POKE 738,1 


ı PUT 158 


ELS 

I=LEN (NAMES) +1 
MEM_NAME$=NAME$S 
MEM_NAMES (I) =". MEM" 
PIC_NAMES=NAME$ 
PIC_NAMES$(I)=".PIC" 
BAS_NAME$S=NAMES$ 
BAS_NAME$ (T}="_BAS" 
EXT_NAMES=NAMES 
EXT_NAME$(I)=" EXT" 
INP_NAMES=NAMES 
INP_NAMES(I)=". INP" 
ASM_NAME$=NAMES$ 
ASM_NAME$(I)=".ASM" 
TRAP #EMPTY 

OPEN #1,4,0,PIC_NAMES$ 
BGET #1,BILD,959 


' FOKE 93,FEEK (BILD) 


# EMPTY 

CLOSE #1 

PUT 158 

DPOKE DL,$2420 

REPEAT 

REPEAT 

# INPUT_EHAR 

TRAP #INPUT_CHAR:GET KEY 

UNTIL (PEEK(84)£>23 OR KEY<>155) AN 


D KEY<>125 


1528 

PUT 
15358 
1542 
1558 
1960 
1578 
1582 
1578 
1508 
1510 
1628 
1658 
1548 
1550 
1558 
1578 
1688 
1598 
17008 
1718 
1720 
17538 
1748 
1758 
1752 
1778 
1788 
17978 
1880 
1818 
1828 
18350 
1548 
1850 
1858 
1878 
18508 
15978 
1700 





IF PEEK(84)=23 AND FEEK(85)=39 THEN 
u 

POKE 99,119 

PUT KEY 

UNTIL KEY=27: 

IF FEEK(84)=9 AND FEEK (BF) =0R 
TRAP #MENUE 

OPEN #1,4,2,MEM_NAMES 
GET #15X 

FOR I=B TOX 

FOR J=8 TO 2 

GET #1;Z 

IF J=1 

GET #1;ZH 

Z=IH*256+Z 

ENDIF 

Z(1,D)=Z 

NEXT J 

J=J-1 

REPEAT 

J=J+1 

GET #15Z 

Z(1,0=Z 

UNTIL Z=8 

NEXT I 

MFLAG=1 

ECLOSE #1 

TRAP #ERROR 

OPEN #1,4,2,PICL_NAMES 
BGET #1,BILD,9759 
ECLOSE #1 

EILSE 

POKE 752,1:FPUT 27 
TRAP #ERROR 

DPEN #1,8,8,PIC_NAMES 
BPUT #1,BILD,959 
CLOSE #1 

DFOKE DL,F9588+48 
IM_BILD=BILD-1 

x=-1 





Y=1 
REPEAT 

IM_BILD=IM_BILD+1 
CHR=PEEK(IM_BILD) 


INV_CHR=(CHR+128) MOD 256 
POKE IM_BILD,INV_CHR 
IF CHR<>91 AND (CHR>B DR MIN_CODE=7 


IF EHR=MARK 

DPOKE DL,FB500+29 
CHR=B 

I=5 

Y=1 

x=X+1 
Z(X,Y)=IM_BILD-BILD 


| Yer+il 


Z(X,Y)=8 

Y=Y+1 

REPEAT 

REPEAT 

# INPUT_VAR 

POKE 792,64 

POKE 694,8 

TRAP #INPUT_VAR:GET KEY 
IF I=5 


| OK=INSTR (KEYF„CHRS$ (KEY?) „14) 


ELSE 

OK=INSTR (KEYF,„CHRF (KEY) ) 
ENDIF 

IF KEY=-125 AND I>5 
I=I-1 

FOKE FOSRd+20+1,.08 
ENDIF 

UNTIL OK>® OR KEY=155 
IF KEY<S>1275 AND KEY<>155 
FPOKE B5B0O+20+1I,KEY-32 
I=I+1 

ENDIF 

UNTIL KEY=155 DR I=1? 
DPOKE DL. , FB&s28+408 

FOR J=5 TO I-i 
Zi(X„Y)=PEEK (#BA00+2B8+J) +32 
Y=Y+1 

FOKE FBABd+2B+J,8 

NEXT J 

Yy=1 

ELSE 

IF Y=i 

A=X+i 
Z(iX,Y)=IM_BILD-BILD 
Yy+l 

ZziX.Y)=1 

Y=Yy+i 

ENDIF 

IF CHR=54 THEN CHR=8D 
IF CHR<&4 
ASCE_EHR=CHR+32 

ELSE 

IF CHR>&653 AND CHR<PF& 
ASC_CHR=CHR—-54 

ELSE 

IF CHR>127 AND CHR<192 
ASC_EHR=CHR+32 

ELSE 

IF EHR>1F1 AND CHR<Z24 
ASC_CHR=CHR-54 

ELSE 

ASE_CHR=CHR 

ENDIF 

ENDIF 

ENDIF 

ENDIF 

Z(X,D=ASC_CHR 

Y=Y+i1 

IF tIM_BILD-BILD+1) MOD 42=B THEN Y 


Listing 1. »Screen-Definition-Utility«. 
Bitte mit Prüfsummer eingeben. 





7% 








ENDIF 

ELSE 

Y=1 

ENDIF 

POKE IM_BILD,CHR 

IF X>97 

GRAPHICS ®@ 

PUT 25 

? "ERROR-„MEHR-ALSASS.FELDER" 
? "VERSUCHEAMINIMUM-LCODE=""J""" 
END 

ENDIF 

UNTIL CHR=91 

IF X=-1 THEN G0# MENUE 
POKE IM_BILD,® 

TRAP #ERROR 

OPEN #1,8,9,EXT_NAMES$ 

BPUT #1,BILD,959 

LLOSE #1 

TRAP #ERROR 

OPEN #1,8,8,ASM_NAMES$ 

PUT #1,255 

PUT #1,255 

PUT #1,MEMORY MOD 256 

PUT #1,MEMORY DIV 256 

PUT #1, (MEMORY+9S58) MOD 256 
PUT #1, MEMORY+958) DIV 256 
BPUT #1,BILD,959 

CLOSE #1 

ENDIF 


' DPOKE DL,FB488+50 


REPEAT 
FOS=2(Z,1)*+BILD 
IF Z1Z,Z2)=1 
CHR=PEEK (FOS) 
ELSE 
ECHR=31 

ENDIF 
INV_CHR={CHR+128) MOD 25& 
POKE FOS,„INV_CHR 
TRAP #ERROR 

GET KEY 

IF KEY=27 

IF MFLAG=1 
EXIT 

ELSE 
FOR I=-8 TO X 
Z(i1,8)=8 
NEXT I 

=B 
ENDIF 

ELSE 

IF MFLAG=1 

FOR I=8 TO X 
Z(1,0)=8 
NEXT I 
L=-D 
MFLAG=D 
ENDIF 

IF KEY=42 
# RISHT 
REPEAT 
Z=7-+1 

IF Z>X THEN Z=B 
UNTIL Z{iZ,387=8 OR L-1=X 
ELSE 

IF KEY=453 
REPEAT 
I=7-1 

IF Z<B THEN Z=X 
UNTIL Z(Z,8)=8 
ELSE 

IF KEY=155 
L=L*+i 
Z(Z,B)=L 
GO# RIGHT 


 ENDIF 


ENDIF 
ENDIF 
ENDIF 





>4589 FOKE POS,„CHR 

5462 UNTIL L=1=X 

3478 FUT 158 

Sasa CLS 

34978 POKE 7532,8:PUT 158 

sSaa DPOKE DL,#B4sB0+180 

3518 POSITION 13,8 

3528 ? "Line,Number:"; 

3538 POSITION 15,18 

3540 7? "Increase:";s 

3558 REPEAT 

5548 POSITION 24,8 

sa7n ? "10", 

3588 POSITION 25,18 

3S9B 7 "10", 

Ssö0gd REPEAT 

»öi8 # INPUT_LINE 

Sa2g POSITION 268,8 

3538 TRAP #INPUT_LINE: INPUT ""sLINE 
640 LINE=ABS(TRUNC (LINE) ) 

5458 UNTIL LINE>=2 AND LINE<S3276& 
S6sgd POSITION 25,8 

5470 7 LINE, 

S&80 REFEAT 

3698 # INPUT_INC 

3728 FOSITION 26,10 

3718 TRAF #INPUT_INC:= INPUT ""zINE 
>720 INC=ABS(TRUNC (ING) ) 

57380 UNTIL INC>® 


5740 UNTIL LINE+t((X+1)#2+1)#=1NC< 32747 


3759 POSITION 26,18 

3750 ? INC, 

3778 Z=® 

3788 TRAP #ERROR 

37978 OPEN #1,8,0,BAS_NAMES 
3328 OPEN #2,8,8,INP_NAMES 
3810 7? #isLINE: "GRAPHICS" 
3820 ? #25LINE: ".GRAPHICSAD" 
3838 LINE=LINE+INC 


3840 ? #23LINE: "OPEN#1,4,0,"""3EXT_NAM 


Eg,tte n. 
35858 LINE=SLINE+INE 


3868 7? #2; LINE; "“BGET-#1,DPEEK (BB) „959" 


3878 LINE=LINE+INC 


53808 ? #2; LINE; "«FOKEx7S3,.PEEK (DPEEK (88) ) 


38570 LINE=LINE+INC 
SsPBB Ii=-i 

SsF1B0 X=iX+1 

3928 REPEAT 

39358 Z=I#+1l 

3740 REPEAT 

3958 I=I#+1 

397820 UNTIL Z{1,08)=27 
3?78 DX=Zt(I,1) MOD 42 
3980 DY=Z(I,1) DIV 48 


39970 ? #15; LINE: "POSITION. ":DX>","ıDY;, ": 


FOKEIF,11®" 


4888 IF Z(1,2)=B THEN ? #2: LINE; ".POSITI 


ON.":DX3 ",„":DY; ":FOKE_97, 11%" 
42318 LINE=LINE+INC 

4020 J=3 

4858 IF Z(1,2)=1 

2240 ? #1; LINES "„7,.""": 

4258 LINE=LINE+INC 

4250 REPEAT 

4872 7? #15CHR&(ZCI,J))5 


4888 IF Z{I,J)=34 THEN ? #1;5CHR$ (34); 


4098 J=J+1 

4108 UNTIL Z(I,J)=2 
4110 7? #isttnz" 
4120 ELSE 

4139 As="DUMMY: " 


41408 ? #15 LINES "ATRAP<"SLINE-IND; "= INPUT 


RI TE TweeeT| 
a RN 


„3 
4158 7? #2:LINE: "«TRAP-"sLINE-INC: "=: INPUT 


Im TE meer 
al ee 


# 
4168 LINE=LINE+INC 
4178 REPEAT 
4188 FLAG=® 











4198 IF Z(I,J)=40 


4208 IF Z(I,I-1)=36 THEN A$te,7)="$:" 


42198 7? #1;A$; 

a220 7? #2; A$; 

42538 J=> 

2240 REPEAT 

4258 ? #13 CHR$(Z(1,J)) 
4268 ? #2; CHRE(Z(I,J)} 
4278 J=J*#+1 

4258 UNTIL Z(I,J)=B 


4298 ? #15 "="zAS(1,LEN(AS)-i) 
4300 ? #25 "=";As(1,LEN(AF-1) 


4318 FLAG=1 

4328 ENDIF 

4338 J=J+1 

4348 UNTIL Z{I,J)=8 
4358 IF FLAG=O 

4368 J=3 

4370 REPEAT 

4350 ? #1;CHR$EIZCI,J)) 
43970 7 #2:CHR$(Z(I,J)) 
4409 J=J+1 

4412 UNTIL Z(I,J)=® 
4420 ? #13 CHR$ (155); 
44538 7 #2; CHR$ (155): 
4440 ENDIF 

4458 ENDIF 

4460 I=-1 

4478 UNTIL Z=X 

4488 TRAP #ERROR 

4498 CLOSE #1 


4508 OPEN #1,8,8,MEM_NAME$ 


4518 X=X-1 

4520 PUT #1;X 
4538 FOR I=@ TO X 
4542 FOR J=B TO 2 
4558 Z=Z(I,J) 
4568 PUT #15Z 


4578 IF J=1 THEN FUT #1;Z DIV 25& 


Programmname :5DU 


a ea 
Bas: 52 
92319:52 
B218:52 
D920:52 
2228: 7C 
2232: 88 
2238: 80 
2a40: 7 
2948: A? 
BaS5d: 7C 
B0358: 00 
Bas: B4 
DOSE: B4 
Bar7a:BO € 
BBr7B:41 
2030:52 
D039:52 
Ba70:52 
D0958:52 
BaAg:7C 88 
DBaAB: ad 
BOBB:&F 
DaABB: 72 
BaCcpB: Bu 
BBCB:7C 
Baba: 20 
BabEB: BE 
BBEB: BO 
DBES: OO 
BOaFB: FC 
BaFEB:DO 
2120: 20 
Bı1BB:&1 
B118:29 
23118: 7C 
2120: 00 
8125:98 
2139: 808 


SHSBSSHUSE8ENBABRHSS 
ANESSAZABSASSSE 


PETTTEIITTTT 


Li 
7 


[1 
EL. 


SSSRASSHENnBSSAnBAaNerh 


0138:B20 
3148: 7C 
2148:08 
8150:52 
9158:52 
0150:80 
23158: 7C 
D172:88 
2B178:B8 
2182:09 
9189:B89 
819798: 7C 
B1?78:75 
B1AB:SE 
41A8:008 
B1B0:B0 
B1BB:7C 
2109: 00 
B1C8: 28 
21D9:08 
B1D8:B0 
DIEB: 7C 
B1EB:4F 
BIiFG: 73 
BiFB:72 
2289:65 
22088: 7C 
a?1B:&7 
B718:Bg 
0229:72 
D72B8:74 
8238: 7C 
327358: 0D 
9240:55 
2248: 53 
DB250:&B 
3258:7C 
Dr: 57 
B258:08 
37708: 00 
2278: 38 
28298: ?7C 
0288:0809 


NEXT J 

J=J-1 

REPEAT 

J=J+1 

PUT #15 Z(1,) 
UNTIL Z(I,J)=® 


NEXT I 

CLOSE #1 

DPOKE DL ,$sB4ARd+120 

= 

7 

7 "NEW" 

7 

7? 

7 "ENTER."""3BAS_NAMES$ 
? "ENTER="""3 INP_NAMES$ 
7? "BLOAD-"""3ASM_NAMES 
END 

# ERROR 

CLOSE 

DL_OLD=DPEEK (DL) 


DPOKE DL,$0499+142 

POKE 754,255 

GET KEY 

DFOKE DL,DL_DLD 

TRAP #ERROR 

GOTD ERL 
DATA.ESBEREREdIi tor eeeeeee 
DATAnameZ@ee@eeeeg2g22200@ 
DATA„eBeeE28searchingeaeeee 
DATA,@ee22228880r Jer eeeeeee 
DATA nameZleeeeeeeeeeeeeee 
DATA-@e@e@e2Be@egenerateeeeeee 
DATA.eeBEEE8Rr eadyveeeeese 
DATA-@di sc@eok_@pressäkey@ 
DATA.eeeeReeEmenußeeeegee 


Listing 1 (Schluß) 


BESSSSBUNSSSSS 


Su 
0 


0290:00 
92978:38 
22A8: 09 
BZAB: 7C 
27B0: 08 
DB2BES:B0 
2209: 2809 
92C5: BB 
9209: 7C 
02D3:55 
D2EO:DD 
BZEB: BU 
DZFO: O0 
B>FB: 7C 
2308: 00 
23538: 80 
2318: 090 
B515:28 
2328: 7C 
0528:&D 
233508: 2E 
23333:00 
9340:00 
2348: 7C 
2B350:00 ı 
2358: 00 
2352: 08 
B358: 80 
9379:5#A 
8378:52 
23388:52 
1388:52 
33998: 72 
3578: 00 
BIAD: DE 
03A8: BI 
B3Bd:an EG 
23B8:B0 & 


SEBNEHESASERASS 


Listing 2. »SDU«. Bitte mit 
AMPEL eingeben. 


I x947 


<9C> 
“20> 
<ER> 
<B4> 
<BC> 
<C4> 
487 
<b9P> 


| <1E> 


<E4> 


| SE9I> 


“FF> 
<BA> 
<D&> 
<BE> 
<14> 
Far 
<F7> 
“197> 
<4D> 
<Cc4> 
<cA> 
BC> 
<535> 
<SE> 
&6> 
<EA> 
<D1> 
<DD> 
35 > 
<28> 
<25> 
<FE> 
As> 
<AE> 
BA} 


| <BE> 











Unser Prüfsummer für alle Atari-Computer ist 
besonders komfortabel. Mit Hilfe dieses Pro- 
gramms lassen sich Listings auf Anhieb korrekt 
und problemlos eingeben. 


ag der Atari-Prüfsummer auf den ersten Blick 
AM: umfangreich erscheinen, der Aufwand 
lohnt sich. So legt der Prüfsummer zum Beispiel 

eine zusätzliche Statuszeile am oberen Bildschirmrand an. 
Diese Zeile ist von Basic aus nicht zu erreichen, also auch 
nicht zu löschen. Weiterhin können Sie den Prüfsummer 
auch für die Eingabe von Turbo-Basic-XL-Programmen ver- 
wenden. Beachten Sie hierzu die besonderen Hinweise! 

Indem abgedruckten Listing finden Sie gewisse Zeichen 
vor, die der Atari nicht kennt. Es handelt sich dabei einer- 
seits um Dreiecke und andererseits um geschweifte Klam- 
mern. Die Dreiecke stellen grundsätzlich Leerstellen dar; 
Texte, die zwischen geschweiften Klammern stehen, reprä- 
sentieren Ätari-spezifische Grafik- und Sonderzeichen. Ein 
Beispiel: »ESC CTL=« entspricht dem ASCIlI-Zeichen 29. 
Um dieses Zeichen einzugeben, betätigen Sie zunächst 
de <ESC>-Taste und dann gleichzeitig die 
<CONTROL>- und die < = >-Taste. Daraufhin erscheint 
das gewünschte Zeichen auf dem Bildschirm. Eine kom- 
plette Aufstellung aller Grafik- und Sonderzeichen finden 
Sie in der Tabelle. Weiterhin gibt es unterstrichene Zeichen, 
die eine inverse Darstellung bedeuten. Bevor Sie ein sol- 
ches Zeichen eingeben, müssen Sie unbedingt die Atari- 
Taste betätigen. 

Bild 1 zeigt eine Programmzeile in der üblichen Darstel- 
lungsweise und zum Vergleich dazu eine in konvertierter 
Form. 





POSITION JAugZ: EL 
ZOOM 4,5: KellEnamE SIZE":POSITI 


49520 FOSITION 11,2:”7 


"LETL ZIIETL RIICTL 
RIICTL R3ÄiCTL R3iCTL RFICTL R3{CTL RYic 
TL RF{ETL RFZCETL RHECTL RHÄCcTL R3ECTL BR 
sCTL RYiSHIFT =7":POSITION 4,5:?7 "FILENA 
ME-...SIZE":POSITION 2,7 





Bild 1. Oben eine Programmzeile, wie sie auf dem Bildschirm 


erscheint. Darunter dieselbe Zeile in der konvertierten Form. 


Geben Sie also zunächst das Prüfsummenprogramm 
von Basic - oder Turbo-Basic XL - aus ein. Zwar werden 
sämtliche DATA-Werte nach dem Start mit RUN überprüft, 
aber »nobody is perfect«. 

Kontrollieren Sie also das Prüfsummenprogramm vor 
dem Start noch einmal. Speichern Sie es dann auf einem 
Datenträger. Jetzt können Sie das Programm beruhigt mit 
RUN starten. Aus den DAÄTA-Werten wird nun ein 
Maschinen-Programm erzeugt. Sollte sich beim Eintippen 
des Programms ein falscher DÄTA-Wert eingeschlichen 
haben, so wird die entsprechende Zeilennummer auf dem 
Bildschirm angezeigt. 

Nach der Korrektur starten Sie das Programm erneut mit 
RUN. Wurde das Programm fehlerlos eingegeben, stehen 
folgende Funktionen zur Auswahl: 

1. Das Prüfsummen-Programm als Maschinensprache- 
File auf Diskette schreiben. Nach Betätigung der Taste 1 


SO 

















Prüfsummer paßt auf 


fragt das Programm nach dem Namen für das Prüfsum- 
menprogramm. Tippen Sie also beispielsweise »PRUE- 
FEROBJ« ein, so wird nach Druck auf die 
<RETURN>-Taste das Prüfsumfnenprogramm auf Dis- 
kette gespeichert. Der Computer schließt den Vorgang mit 
der »READY«-Meldung ab. 

Um das Prüfcode-Programm verwenden zu können, 
löschen Sie den Programmspeicher zunächst mit NEW. 
Vom DOS-Menü aus (einfach DOS eintippen und die 
<RETURN > -Taste betätigen) wählen Sie die Option L und 


FPruefcode : jr 
ZaaR2 PROC RECHHREN 
IELE BRaPH en et , 


(c3 35 bu K. Kresse 


TIze: TYWSBIRZIOVIZE 

SMILE FLITMAR AND ckzevzıda 
VELZEHEBEN- CT IRNSRZ-VZ-CH 
a 


ELSE 
’"CoLgR iTI ro ZI+r%1 
ERDIF 


EXRZCHFER:PLOT SPALTE, ee 
IF PEEXC7EAIS2E FHEU 


a SPALTE 





Bild 2. So sollte der Bildschirm nach dem Aktivieren des 
Prüfsummers aussehen 


geben den Namen des vorher erzeugten Maschinenpro- 
gramms ein. Jetzt wird das Prüfsummenprogramm in den 
RAM-Speicher geladen. Mit <B> gelangen Sie wieder 
zurück ins Basic. 

Aktiviert wird jetzt das Prüfsummenprogramm mit 
»?USR(1536)«. Am oberen Bildschirmrand erhalten Sie 
daraufhin eine zusätzliche Zeile mit dem Schriftzug »Prüf- 
code: > < (c)byW. Kress/wb«. Wie die Aufteilung des Bild- 
schirms unter Verwendung des Prüfsummenprogramms 
aussieht, zeigt Bild 2. 

2. Das Maschinenprogramm wird als Boot-File auf Kas- 
sette geschrieben. Das spätere Laden oder Booten gehtfol- 
gendermaßen vor sich: 

- bei ausgeschaltetem Computer die <STAÄRT>-Taste 
drücken und Computer einschalten, 

- nach Ertönen des Summtons die <START > -Taste loslas- 
sen, 

- nacheinander die <PLAY>-Taste des Kassettenrecor- 
ders und die <RETURN>-Taste betätigen, 

- das Prüfsummenprogramm wird geladen und automa- 
tisch gestartet 

3. Programm beenden. Das Maschinenprogramm wird 
nicht gespeichert. 

Das Prüfsummenprogramm wird in der Page 6 abgelegt, 
einem vor NEW geschützten Speicherbereich. Abschalten 
kann man es durch Drücken von <SYSTEM RESET», ein 
Neustart erfolgt mit dem Aufruf: »?USR(1536)«. 

Sobald das Prüfsummenprogramm aktiviert ist, können 
beim Zugriff aufein Speichermedium Bildstörungen auftre- 
ten. Um dies zu vermeiden, brauchen Sie nach dem Laden 
oder nach dem Aufruf mit »?USR(1536)« nur »POKE 
39998,30« einzugeben. 

Wurde das Programm von Kassette gebootet, wird es 
jedesmal nach Betätigung der <SYSTEM RESET >-Taste 














erneut gestartet. Gibt man jedoch vor der Betätigung der 
< SYSTEM RESET >-Taste »POKE 9,0« ein, kann man die- 
sen Effekt umgehen. 

Bevor Sie nun ein eingetipptes Basic- oder Turbo-Basic 
XL-Programm mit RUN starten, sollten Sie es sicherheits- 
halber: noch einmal speichern. Weiterhin sollte das 
Prüfsummen-Programm mit <SYSTEM RESET > desakti- 
viert werden, da auch manche Basic-Programme die Page 
6 für Maschinen-Unterprogramme verwenden. Es könnte 
sonst zu Überschneidungen und zum Systemabsturz kom- 
men. 

Der Prüfcode besteht jeweils aus zwei Zeichen. Er setzt 
sich aus den Buchstaben von A bis Z zusammen. Geben 
Sie nun probeweise eine Programmzeile ein und schließen 
Sie mit der <RETURN>-Taste ab. Der zugehörige Prüf- 
code erscheint dann in der obersten Zeile. Sollte der Code 
nicht mit dem im abgedruckten Listing übereinstimmen, 
kann die Programmzeile sofort verbessert werden. Die 
jeweilige Programmzeile braucht dazu nicht erneut einge- 
geben zu werden, da sämtliche Editierfunktionen des Atari- 
Computers zur Verfügung stehen. 

Ein wichtiger Hinweis: 

Für die erste Programmzeile kann eventuell ein falscher 
Prüfcode errechnet werden. Sollte die Prüfsumme also 
nicht mit der im Listing abgedruckten übereinstimmen, 
fahren Sie mit dem Cursor nochmals auf die erste Zeile. 
Sobald Sie die <RETURN>-Taste betätigt haben, 


Fe 5 
HE 


erscheint der richtige Code auf dem Bildschirm. Stimmt 
der ausgegebene Wert dann immer noch nicht, überprüfen 
Sie nochmals jedes einzelne Zeichen der von Ihnen einge- 
gebenen Programmzzeile. 

Bei der Eingabe von Programmen sind die üblichen 
Abkürzungen für Basic-Befehle zulässig. Sie können also 
zum Beispiel G. für GOTO, SE. für SETCOLOR und so wei- 
ter verwenden. Eine Ausnahme gilt jedoch bei der Abkür- 
zung für den PRINT-Befehl, den man in der Regel mit 
einem Fragezeichen abkürzen kann. Verwenden Sie das 
Fragezeichen bitte nur dann, wenn es auch im Listing 
verwendet wird. 

Möchten Sie nachträglich ein Programm überprüfen, so 
laden Sie zuerst das Prüfsummenprogramm und starten es 
mit »?USR(1536)«. Anschließend laden Sie Ihr Programm 
und listen einen Teil auf dem Bildschirm. Dann bewegen 
Sie den Cursor an irgendeine Stelle einer Programmzeile. 
Mit Betätigung der <RETURN > -Taste wird der Prüfcode 
in der Statuszeile dargestellt. Stimmt der Prüfcode mit dem 
im beigefügten Listing überein, betätigen Sie wieder die 
<RETURN>-Taste und der Prüfcode der nächsten Zeile 
wird errechnet und angezeict. Auf diese Art und Weise kön- 
nen Sie ein komplettes Programm oder auch nur einzelne 
Zeilen »durchchecken«. 

Sollte der Code nicht mit dem des Listings übereinstim- 
men, überprüfen Sie Ihre Programmzeile. Denn bei allen 
abgetippten Listings gilt: Die Programme müssen so abge- 
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ISIS: | 2% sales | 3% 8 |E= | 2% a5 [Een 
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1) [] ETL, 19 FILES 28 | EZ (Invers) CTL , 147 (Invers) CTLS5 
] [F CTLA 20 [®] CTLT 129 HF (Invers) CTLA 148 Di (Invers} CTLT 
> 1 | CTLEB 2] [mm] CTLU 130 | Een (Invers) CTLB 149 Pe (Invers}; CTL U 
3 2] CTLC 22 N] ETLY 131 | 4 (Invers) CTLC 150 I (Invers) CTL V 
4 | ETLD 9 | CTLW 132 (Invers) CTL D 151 | Tr (Invers) CTL W 
5 5 CTLE 24 [=] CTLX 133 Eu (Invers) CTLE 152 | + {Invers) CTLX 
6 CILF 25 [IB CTLY 134 {Invers) CTLF 153 | [B (Invers) CTLY 
| 
7 ECTLG 26 [®] CTLZ 135 {Invers) CTLG 154 |» (Invers) CTLZ 
8 [dl CTLH 27 &| ESC ESC 136 4 (Invers) CTLH 156 ESC SHIFT DEL 
| [a GILT 8 [?] ESCSTE—| 387 a {Invers) CTL] 157 ESG SHIFT > 
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14 IE CTLN 123 [®] | 142 = (Invers; CTL N 252 JE {Invers) SHIFT = 
15 CTLO 124 SHIFT = 143 PB (Imvers) CTL © 253 63 ESC CTL2 
16 CTEP 135 [Mi ESC.GTL - 144 E (Invers) CTL P 254 &] ESC CTLDEL 
17 [r) CTLO 126 4 ESC DEL 145 r (Invers) CTLQ 255 [2 ESCCTL> 
18 = | ETLR 127 D ESC TAB 148 -| (Invers) CTLR Tabelle der Atari-Grafikzeichen 
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tippt werden, wie sie gedruckt sind. Stimmt die Anzahl der 
Leerzeichen? Haben Sie eventuell Zeichen vertauscht? 
Oder haben Sie ein »?« anstelle eines PRINT-Befehls ein- 
gegeben? Haben Sie den Fehler gefunden? Dann weiter- 
hin viel Erfolg mit Ihren Atari-Programmen! 


Besondere Hinweise zum 
Prüfsummenprogramm 


Wenn Sie ein Turbo-Basic XL-Programm eingeben 
möchten, müssen Sie das Prüfsummenprogramm mit 
einem Hilfsprogramm starten. Weiterhin empfiehlt es sich, 
eine separate Diskette sozusagen als Eingabediskette zu 
verwenden. Formatieren Sie also eine Diskette. Verwenden 
Sie aber bitte nur DOS 2.0 oder 2.5! Speichern Sie 
anschließend die DOS-Files und Turbo-Basic XL mit dem 
Namen »AUTORUN.SYS« auf dieser Diskette. Dann schal- 
ten Sie den Computer aus und booten die soeben ange- 
legte Diskette. Geben Sie anschließend folgende Pro- 
grammzeile ein: 

1 BLOAD ”"D:PRUEFER.OBJ” :POKE $BC3E,$1E:*L-:NEW 
Speichern Sie diese Programmzeile dann mit »SAVE 
"D:AUTORUN.BAS”« auf Ihrer Eingabediskette,. Dieses 
kurze Programm sorgt beim Booten des Computers dafür, 
daß das Prüfsummenprogramm automatisch geladen und 
ausgeführt wird. Achtung: Das Prüfsummenprogramm 
läßt sich nicht vom DOS-Menü aus starten! Die oben 
aufgeführte Programmzeile muß unbedingt beim Boot- 
vorgang ausgeführt werden. Auf Ihrer Prüfsummer- 
Diskette sollten sich also folgende Files befinden: 

1. DOS.SYS (entweder DOS 2.0 oder 25) 

2. DUPSYS (passend zum DOS.SYS-File) 

3. AUTORUN.SYS (Turbo-Basic XL) 

4. AUTORUN.BAS (das Initialisierungsprogramm) 

5. PRUEFER.OBJ (das eigentliche Prüfsummenprogramm 
als Maschinencode-File) 

Wenn Sie Turbo-Basic unter unserem Happy-DOS ver- 
wenden, müssen die einzelnen Files anders auf die Dis- 
kette geschrieben werden. Die folgende Liste zeigt wie: 


109 REM SEHE HH <LU}> 
i11@ REM <HA> 
1290 REM FRUEFCODE fuer ATARI sCEU> 
150 REM <HE? 
140 REM von KWN.Kress <ZI> 
159 REM Lindenweg 17 AA? 
151 REM sam Achern -10> 
178 REM (c) by Happy-Computer <DC> 
1509 REM * <HO}F 
1FA REM HH HEHE HIER Mr} 
ZUR REM “Al: 
219 DIM F#(15) „SED# (2) „Dr (594) „C#H(11) RC? 
ra TE="{CTL „FCCTL D>U7ZLCTL AriCTL Fr>s 

<CTL MFICTL B>S" «IZ> 
2308 GRAPHICS B:FOKE 82,8:POKE 752,1 <KW}F 
740 POSITION 12,12:POKE 291,8 <BO> 
2590 7 "Bitte,warten„!":POKE 752,8 -DX> 
z&60 Z=i0Bd xGZ> 
278 FOR I=1 TO 4977 STEPF 8 OL> 
58 FSUMM=B <MG> 
zs2a FOR J=2 T0 7 <PK}> 
Sa READ SEDF <ZIVF 
>18 H=ASC(SEDE(1))-48 ED} 
szA IF H>F7 THEN H=H-7 <LT> 
>90 L=SASCISEDE(2)I)-48 <sGE> 
>40 IF L>9 THEN L=L-7 £<SR> 
>50 DEZ=H#1&4+_:D£(I+J)=CHRE (DEZ) zJV> 


. u Su SE SE Zu Zu Zu / 


1. Diskette formatieren mit »FO#« 

2. DOS.SYS auf die Diskette schreiben mit »IN #« 

3. Turbo-Basic mit»COPY AUTORUN.SYS« auf die initia- 
lisierte Diskette schreiben 

4. Turbo-Basic mit »REN AUTORUN.SYS TURBO.COM« 
auf der Diskette umbenennen 

5. Mit »JOB TURBO« das Happy-DOS veranlassen, das 
Turbo-Basic automatisch zu laden 

6. »AUTORUN.BAS« wie in der ersten Liste beschrieben 
auf die Diskette schreiben 

7. »PRUEFER.OBJ« auf die Diskette schreiben 

Das Turbo-Basic wird dann automatisch geladen, gestar- 
tet und der Prüfsummer installiert. 

Eine ähnlich Prozedur muß angewendet werden, wenn 
andere DOS-Versionen, wie zum Beispiel OSS CP/A 1.2, 
2.1 oder DOS XL, benutzt werden. Anstelle von Punkt 5 
müssen Sie allerdings von Basic aus die Befehlsfolge 
OPEN #1,8,0,”D:STARTUP:EXC”:? #1; TURBO”: 
END« eingeben. Dann wird auch in diesen DOS-Versionen 
Ihre Prüfsummer-Diskette automatisch gestartet. 


Basic-Programme schnell und 
zuverlässig eingegeben 


Um also unter Turbo-Basic XL den Prüfsummer verwen- 
den zu können, brauchen Sie nur Ihre Prüfsummer-Dis- 
kette ins Laufwerk einzuschieben und Ihren Computer ein- 
zuschalten. Alles weitere erledigt der Computer von selbst. 
Vergessen Sie bitte nicht, sich von der neuen Prüfsummer- 
Version auch eine Sicherheitskopie anzulegen. Sind noch 
Fragen offen, wenden Sie sich bitte an die Redaktion. 

(Werner Breuer/hf) 











Steckbrief 





Z68 PSUMM=PSUMM+DEZ 

370 NEXT J 

Z8® READ ZSUMM 

398 IF PSUMM=ZSUMM THEN 4198 

400 ? "<ESC CTL 23DATENFEHLER-!":LIST Z: 
END 

418 GSUMM=GSUMM+PSUMM: Z=Z+10 

428 NEXT I 

458 READ ESUMM 

440 IF ESUMM=BSUMM THEN 468 

458 ? "{ESC CTL Z+FEHLENDE-ODER-DOFPELTE 
„DATA-ZEILE":END 

468 ? "{ESC CTL 27" 

478 ? "{ESC ETL <+" 

488 POSITION 2,6:? :POKE 752,1 

498 ? „"{CIL VIICCTL Y}«AUf-DISKETTE-sSch 
reiben{ESC CTL =I<ESC CIL =)" 

5B@ ? „"{CIL_YI2ICTL YIasAufCASSETTExsch 
reiben{ESC CTL =3XESC CTL =}+" 

518 ? „"{CETL_Y>S{CTL YI2ENDE" 

528 OPEN #1,4,8,"K":GET #1,K:CLOSE #1 
538 K=K-48:IF K<1 OR K>Z THEN ? "{ESC CT 
L 23"s:60T0 5294 

548 POSITION 3,4+3#K3? "——— >"; 

S5g POSITION 2,28:? "{ESC SHIFT DEL}Y"; 
5628 ON K G0T0 579,590,6308 

570 FOKE 752,8:? "{ESC TABYDATEINAMEr: 42 


Listing zum Atari-Prüfsummer 





Di:<ESC CITL +7{ESC CTL +3{ESC CTL +}{ESC 

CTL.+2", ' 

588 POKE 764,44: INPUT F$:D=1:60T0 618 

598 F$="C:":D=Q 

&Bd ? „"CASSETTE<FERTIGMACHEN, RETURN" ; 

&18 TRAP 668 

620 OPEN #1,8,128,F$ 

6538 IF D THEN ? #1;D$(1,500); 

648 IF NOT D THEN ? #1:C0%$;D$ (7,494) 

658 CLOSE #1:60T0 478 

558 ? "LESC CTL 2>{ESC CTL -}{ESC SHIFT 

DEL}{ESC TAB} I/O“--FEHLER";PEEK (195); 

670 TRAP 4BB@0:CLOSE #1:60T0 488 

532 FOKE 752,8:END 

898 REM ———— 

1B00 DATA-FF,FF,28,38,E7,39,A2,FF,1271 

1218 DATA-BD,EB,38,90,28,24,CA,EB,19869 

1828 DATA.FF ,DA,FS,A2,6@,BD,5A,38,1349 
DATA-9ID, 29,01 ,CA,19,F7,A2,0F,800 
DATA-ED,20,E4,9D0,61,01,CA,12,8908 
DATA-F7,18,AD,65,01,69,81,8D,793 
DATA-6B ,26 ,AD,656,81,69,00,8D,635 
DATA6C,86,49,29,80,65,81,49,737 
DATA-965 ,8D,56,81,AD,67,21,8D,6658 
DATA.30,86,AD,68,21,80,34,06,531 
DATA-38,AD,S0,02,E9,02,8D0,02,657 
DATA-85,8D,11,06,AD,31,@2,E9 ,627 
DATA-2Q,5D,297,05,80,12,06,A9,488 
DATA-45,28,74,33,98,11,BE,26,620 
DATA-95,49 ,09,22,74,38,90,07,536 
DATA-SE ,17,26,29,01,06,18,608,338 
DATA.AZ,32,DD,1N,03,F0,08,E8,8972 
DATA-ES,ES,E8,21,D@,F4,18,62,1293 
DATA-70,42,39,01,9E,06, 9E,06,564 
DATA-IE „B& , 75,806, 9E „906, 9E ‚86,615 
DATA.2G,00,09,02,4C,2E,22,54,240 
DATA-3N,22,20,590,45,45,4B,28,469 
DATA-31,31,33,29 ,2B,32,35, 36,390 
DATA-2A,590,45,45,4B,28,31,31,473 
DATA-34,29,9B,01,61,45,91,04,428 





Sie möchten unser neuestes Listing abtippen? 
Mit AMPEL wird das Eingeben von reinen Atari- 
Maschinenprogrammen zum Kinderspiel. 


peziell bei Maschinenprogrammen kommt es darauf 
an, daß jedes Byte korrekt eingegeben wird. Schon 
ein einziger falscher Wert führt meist dazu, daß das 
eingegebene Programm nicht läuft. Dies hat dann oft eine 
stundenlange Fehlersuche zur Folge. Deshalb haben wir 
für Sie »AMPEL« (Atari-Maschinen-Programm-Eingabe- 
Listing) entwickeln lassen. Und damit das Eintippen für Sie 
möglichst einfach und reibungslos verläuft, wählen wir eine 
spezielle Darstellungsform für Maschinenprogramme. 
Beachten Sie bitte, daß Sie zukünftig unbedingt AMPEL- 
Version 1.1 verwenden müssen, um Atari-Maschinenpro- 
gramme einzugeben. Von Basic aus lassen sich solche 
Listings nicht eingeben. Verwahren Sie also das Programm 
zu AMPEL sorgfältig und legen Sie eine zusätzliche Kopie 
an einen sicheren Platz. 

Geben Sie zunächst das nachfolgende Listing ein. Ver- 
wenden Sie dazu den Atari-Prüfsummer. Bevor Sie AMPEL 
mit RUN starten, sollten Sie das eingegebene Basic- 
Programm auf Diskette oder Kassette speichern. Hat sich 
nämlich ein Fehler im Maschinensprache-Teil eingeschli- 
chen, kann Ihr Computer abstürzen. In dem Fall müßte 
AMPEL erneut eingegeben werden. 











DATA.54,398,72,75,65,66,63,6F ,776 

DATA64,65,08,1A,028,09,1E,88,257 

DATA,.2G,1C,29,009,08,63,89,89,144 

DATA-18,15,28,62,79,00,37 ,DE,333 

DATA „2B, 72,65, 73, 73,BF ,77,622 

DATA.62,68,A9,FF,5D,38,82,49,986 

DATA«FF „8D,31,02,A0,05,B9,090,775 

DATAB1,99,FF,FF,88,18,F7,A0,1223 
DATALFF „A2,25,BD,33,01,997,14,842 

DATA83,C3,E8,93,D9,02,AB,FF „1855 
DATA-CA,18,F0,68,A5,77,F8,8A, 1088 
DATA-AF FF ,85,26,49,FF,„85,27,1191 
DATA-C5,77,95,75,F0,2D,AS,A1,1288 
DATAL19,84,C05,73,F9,25,R6,78,896 

DATA-BD,14,21,E6,78,C9,9B,D8,1124 
DATA-AF ,A2,08,86,78,86,73,A6,918 

DATA-AQ,86,71,A6,A1,86,72,A2,1144 
DATAIE „85, 26,A2,06,86,27,E8,981 

DATA-77,D2,35,208,3E,F5,88,09,929 

DATA-9B,DB,82,E6,73,28,68,42,1088 
DATA.20,C9,97B,F9,26,86,CC0,A8,1138 
DATA.2B,86,D1,85,CD,AB,98,45,917 

DATA-D1,929,0C,18,A2,23,BS5,CD,748 

DATA=75,CA,975,CD,CA,D@,F7 ,06,133& 
DATA-CD,265,CC,58,D2,E9,E6,28,1254 
DATA-AB „21 ,659,99,94,A0,82,20,784 

DATA.CC ,86,,A2,83,B5,CA,95,CD,1112 
DATA-CA,DR,FF,A9,1A,28,C0C,86,1896 
DATA-.AS,CD,18,69,21,8D,48,01,746 

DATA.AS5,DQ,69,21,8D0,47,81,84,856 

DATA.DR,CB,84,00,68,85,72,84,1815 
DATA-71,86,CB,868,CC,86,CD,AQ,1287 
DATA-18,18,A2,085,356,CB,CA,198,698 

DATAAFB,58,A2,05,B5,CA,FS,6F,1211 
DATA-95,73,CA,D@,F7,99,0B,BS,1257 
DATA-74,95,CB,E8,E8,03,D8,F7,1382 
DATA.E5,D2,88,D8,DC,60,E2,02,1326 
DATA-ES,22,09,58,298,00,00,00,285 

DATA-53423 

Listing zum Atari-Prüfsummer (Schluß) 





Ampel-Version 1.1 


Nachdem Sie das Programm mit RUN gestartet haben, 
werden zuerst die DATA-Werke eingePOKEt. Dieser Vor- 
gang nimmt einige Sekunden in Anspruch. Danach müs- 
sen Sie die Länge des einzugebenden Maschinenpro- 
gramms eingeben. Diesen Wert entnehmen Sie bitte am 
Ende des abgedruckten Maschinenprogramms. Anschlie- 
Bend geben Sie den Programmnamen an, unter dem Ihr 
Programm gespeichert wird. Auf dem Bildschirm erscheint 
jetzt »0000:«, die Aufforderung, mit der Eingabe der ersten 
Zeile des AMPEL-Listings zu beginnen. 

Betrachten wir eine AMPEL-Listing-Zeile aus der Nähe: 
0000:00 02 00 07 06 07 20 BD <F3> 

Die ersten vier Zahlen (hier 0000) stellen sozusagen die 
Zeilennummer dar. Diese Zahlen sowie den darauffolgen- 
den Doppelpunkt brauchen Sie nicht einzugeben. Danach 
folgen ’'acht zweistellige Hexadezimalzahlen, die Sie dem 
Listing entnehmen. Die Eingabe erfolgt ohne Betätigung 
der <RETURN>-Taste. Der Cursor springt selbständig 
von einer Position zur nächsten. Leerzeichen sowie die bei- 
den Zeichen »<«und»>«fügt AMPEL automatisch ein. Ist 
die Prüfsumme korrekt - sie muß auch von Ihnen eingege- 
ben werden - springt der Cursor in die nächste Zeile. Falls 
nicht, ertönt ein akustisches Signal und alle acht Werte, 
inklusive der Prüfsumme, müssen nochmals eingegeben 
werden. Dadurch wir gewährleistet, daß wirklich alle einge- 
gebenen Hexadezimalzahlen im Listing stimmen und sich 
keine unbemerkten Fehler einschleichen können. 
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Außer den Hex-Tasten (<0> bis <9> und <Ä> bis 
<F>), wirdnurnoch <DELETE BACKSPACE > zum Kor- 
rigieren des letzten Zeichens und <CONTROL S> abge- 
fragt. 


Zwischenspeichern 


Da Sie ein umfangreiches Maschinenprogramm sicher 
nicht an einem Tag eintippen möchten, können Sie zu 
jedem Zeitpunkt mit <CONTROLS> zwischenspeichern. 
Dazu betätigen Sie einfach < CONTROLS > undder Code 
wird unter dem zuvor eingegebenen Programmnamen 
gespeichert. Weiterhin wird automatisch die jeweils zuletzt 
gespeicherte Version in »BACKUPOBJ« umbenannt. Zuvor 
wird natürlich eine ältere »BACKUPOBJ«-Datei gelöscht. 
Danach können Sie den Computer ausschalten oder 
AMPEL mit <RESET> verlassen. 

Wenn Sie das nächstemal AMPEL starten, muß wieder 
die Programmlänge und der entsprechende Name, mit 
dem Sie Ihre letzte Version gespeichert haben, eingegeben 
werden. Existiert bereits eine Datei mit dem entsprechen- 
den Namen, wird die Datei automatisch geladen. Weiterhin 
wird noch die Zeilennummer auf dem Bildschirm ange- 
zeigt, ab der Sie mit der Eingabe der Hex-Werte fortfahren 
müssen. 

Speichern Sie lieber öfter mit <CONTROL+S>, um 
auch gegen eventuelle Stromausfälle gewappnet zu sein. 
Weiterhin empfiehlt es sich aus Sicherheitsgründen, zwei 
Disketten für Daten vorzusehen. Wenn Sie das komplette 
Programm eingegeben haben, speichert der Computer 
nach Eingabe des letzten Bytes das Programm auf Diskette 
und meldet sich danach mit der READY-Meldung. 

Wenn Sie Ihr Maschinenprogramm anschließend laden 
möchten, erfolgt dies vom DOS-Menü aus. Wählen Sie hier 
die L-Funktion und geben Sie anschließend den entspre- 
chenden Programmnamen ein. 


Besondere Hinweise für 
Kassettenrecorder-Besitzer 


Damit AMPEL auch einwandfrei mit einem Kassettenre- 
corder funktioniert, müssen folgende Programmzeilen 
geändert werden: 

290 F="C:” :AD=0 

300 ? ” Altes File laden J/N ” ; 

310 INPUT FR$ 

320 IE FR$<>*"J" THEN 510 

420 TRAP 510:0PEN #1,4,128,F$ 

590 TRAP 660:CLOSE#1:0PEN #1,3,128,F$ 

Die Zeilen 330 bis 360 entfallen, ebenso die Zeilen 450, 
600 und 610. 

Speichern. Sie anschließend die geänderte AMPEL- 
Version mit CSAVE. Somit haben Sie das benötigte Einga- 
beprogramm bereits vorliegen. 


Sicherheit über alles 


Mit <CONTROL S> kann zu jedem Zeitpunkt gespei- 
chert werden. Daraufhin erklingt ein doppelter Signalton. 
Betätigen Sie dann noch die <RECORD>- und 
<PLAY>-Iasten des Recorders und anschließend die 
< RETURN >-Taste. Der Speichervorgang beginnt. Wenn 
Sie dann mit einem anderen Programm arbeiten möchten, 
gelangen Sie mit <RESET> zurück ins Basic. 
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Wenn Sie zu einem späteren Zeitpunkt mit der Arbeit fort- 
fahren möchten, laden Sie wieder zuerst AMPEL, starten 
es mit RUN, geben die Programmlänge ein und beantwor- 
ten die Frage »Altes File laden J/N« mit J. Daraufhin meldet 
sich der Computer wieder mit einem Brummton. Spulen 
Sie das Band an den Anfang zurück, betätigen Sie dann 
noch die <PLAY>-Taste und <RETURN >. Jetzt wird der 
zuletzt eingegebene Programmteil geladen. Anschließend 
meldet sich der Atari-Computer wieder mit der Zeilennum- 
mer, ab der Sie mit der Eingabe fortfahren müssen. 
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So sieht der Bildschirm bei der Eingabe von Maschinenpro- 
grammen aus. Zwischenspeichern kann man jederzeit mit 
der Tastenkombination <CONTROL+S>. 


Um später das eingegebene Programm zu starten, muß 
stets zuerst das »Kassetten-Hilfsprogramm« geladen wer- 
den. Nach dem Ladevorgang meldet sich der Computer mit 
dem Brummton. Anschließend legen Sie bitte Ihre Kassette 
mit Ihrem Maschinenprogramm in den Recorder ein, 
drücken die <PLAY>-Taste des Recorders und während 
Sie die <STÄART>- und <OPTION >-Tasten des Compu- 
ters drücken, schalten Sie die Stromversorgung ein. Nach 
dem Brummton nur noch <RETURN> drücken und Ihr 
Programm wird geladen und anschließend automatisch 
gestartet. 


Programme schnell geladen 


Speziell bei Kassettenrecordern kann es Probleme beim 
Laden von Maschinenprogrammen geben. Deshalb sollten 
Sie stets mehrere Sicherheitskopien von Ihren Program- 
men machen. Hinzu kommt, daß das Laden von Kassette 
sehr viel Zeit beanspruchen kann, da die Übertragungsge- 
schwindigkeit sehr langsam ist. Besitzer einer Disketten- 
station haben es hier viel besser. Sollten Sie mit AMPEL auf 
Schwierigkeiten stoßen, wenden Sie sich an die Redaktion. 

(Frank Ostrowski/\Werner Breuer/hf) 
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REKEN TRIERER" 
r "sn Atari äMPELn.aH" 
„ »*ta(c).Happy-Computer.#" 
„"Nasauns sr NVersion.1. 1a..#" 
KARRIERE" 


7 "ETRL.S52=,/Sichern" 


ae BE Beh BEE Du BEN, Br BEN 


"Einen“Moment“Geduld.bitte."; 
POKE 18,54: POKE 553774,64 

DIM F#t15) ,,FE$(159) ,FR# (27) 

DIM ML$(261) ,„CIOs (83) 

GOSUB 12808 


ı ? CHR&E (156) 


? "Programmlaengex"3: INPUT L 

DIM As(L+3) 

7” "Programmname";: INPUT F# 

IF F$="" THEN 298 

F=8:FOR I=1i TO LENIFFIIF=SF+H(F#£(I,D= 


"SH)SNEXT I 


328 


458 


IF F=B THEN FR$="D: ":FR$CDI=SF$ıF$=FR 


? "Filename."; F$ 
FB#="D: BACKUP. OBJ" 
FRS=FS:FRS (LEN (FREI +1) ="," 


ı FR$(LENEFR$I+L1)I=SFBE (I) 


AD=8:TRAP S1G:0PEN #1,4,8,F$ 

E=USR (ADR (CIO#) „1,7,ADR (AS) „LI 

IF E=i THEN ? "Schonsfertig":END 

IF EX>13&4 THEN ? "Disk-Read-Error."; 


E:END 


450 
478 
18 
>28 
3358 


AD=PEEK (856) +256#PEEK (857) 
AD=8*INT(AD/8) :TRAP 55535 

CD=USR (ADR (ML$) „ADR(A$) „AD) 

ON CD GOSUB 599,6499,71G 

AD=AD+8* (CD=2) 

IF ADX=L THEN 518 

AD=_L:GOSUB 598 

POKE 16,192:POKE 53774,192:END 

TRAP SRB:CLOSE #1:XIO 33,#1,8,2,FB$ 
TRAP &18:CLOSE #1:X10 32,#1,0,0,FR$ 
TRAP 668: CLOSE #1:0PEN #1,8,8,F%$ 
E=USR (ADR(CIOS) „1,11,ADR(AS$) „AD) 
CLOSE #1 

IF E<>1 THEN ? "Disk-Error=":E 

TRAP 45535: RETURN 

CLOSE #1 


 ? "Disk-Error „";PEEK (175) :RETURN 


? CHR& (253) :?7? "Pruefsummenfehler" 
RETURN 
7? "Fehler'!!!!"s: LIST SiB:END 


ı1B20 Q=8 

1818 FOR I=1534 TOD 1592 
1928 READ ArB=ü+A:POKE I,A 
1850 NEXT I 


1848 IF DX>419& THEN ?7 "DatasError":LIST 


1390, 1390: END 

1050 0=8 

19868 FOR I=1 TOD 261 

1270 READ A 

iBasSB IF A>255 THEN GOSUB 11978 
1292 MLECII=CHRS$ (A) ı0=0+A 

1100 NEXT I 

111® READ AriIF Q<>A THEN 1220 
1178 0>=8 

1158 FOR I=1 TO 83 

1148 READ A:Q=0+A:CI0$ (I) =SCHR$ (A) 
1158 NEXT I 

116B IF <>19894 THEN 7? "DatasErrora"s:l 


IST 


17598 ,2889: END 


1178 RETURN 

1198 IF Q=A THEN READ A: 0=B: RETURN 
1238 ? "Data,sError" 

1218 IF A=7931 THEN LIST 1438,1538 
i228 IF A=6585 THEN LIST 1548,1548 
1238 IF A=8135 THEN LIST 1659,1750 
1248 IF A=7184 THEN LIST 17588,1860 
1258 IF A=2222 THEN LIST 1878,1918 











DATA2173,37,228,72,173,36 
DATA-228,72,96,72,74,74 
DATAL74,74,32,28,6,184 
DATA-41,15,9,48,281,58 
DATA-144,2,185,6,168,173 
DATA471,3,72,173,70,3 
DATA«72,152,96,5@,31,30 
DATAA26,24,29,27,51,53 
DATAA48,63,21,18,58,42 
DATA.S6,198,52 


| DATAA169,8,133,213,1984,281 


DATA-2,2428,164,170,2408,5 
DATA.194, 124 ,202,208,251,169 
DATA-3,44,169,1,133,212 
DATA-96,1904,133,215, 184,133 
DATAL214,1984,133,217,1@4,133 
DATA-218,24,181,214,133,214 
DATA2165,217,101,215, 153,215 


ı DATA.169,155,32,28,6,165 


DATA217,32,9,6,165,216 
DATA-7931 
DATA-32,9,6,169,59,32 
DATA-28,6,169,8,133,218 
DATA=173,252,2,41,191,16&2 
DATA417,221,39,6,248,5 


DATA219,141,252,2,32,8 
DATAs6,41,127,32,28,6 
DATA2155,219,281,16,240,168 
DATAL144,48,165, 218, 240,205 
DATAA74,176,5,169, 126,32 
DATA.6585 
DATA128,6,169,4,70,2208 
DATA-192,221,192,222,102,223 
DATA.122,224,102,225,1@2,224 
DATA-182,227,182,228,1356, 208 
DATA235,198,218,184,88,178 
DATA-18,10,10,19,160,4 
DATA-12,39, 2298,38, 227,38 
DATA.226,38,225,38,224,38 
DATA223,38,222,38,221,38 
DATA.220,136, 288,234 ,230,218 
DATA3135 
DATAA165,218,201,18,248,19 


| DATA.281,16,298,4,169,68 


DATA.2298,5,74,176,286,169 
DATA-32,32,28,6,184,88 
DATA-198,165,217,18,101,216 
DATA19,191,229,18,1@1,221 
DATA-.10,101,222,18,1@1,223 


 DATA218,181 ,224,10,1@1,225 


DATA-10,181,226,18,121.227 
DATA-197 ,228,2908,18,169,62 
DATA-7184 
DATA-32,28,6,1608,7,185 
DATA-228,8,145,214,136,16 
DATA-248,169,0,44,169,2 
DATAL133,212,96 

DATA2222 

DATA-124 ,201,4,228,66, 194 
DATAL104,170,184,194,133,212 
DATA.104,133,214,104,153,213 
DATA.104,133,216,104,133,215 
DATA-168,134,138,281,8,176 


ı DATAL3S3,18,19,18,18,178 


DATA.165,212,157,66,3,165 
DATA-213,157,658,3,165,214 
DATA157,69,3,165,215,157 
DATA-72,3,165,216, 157,73 
DATA3,32,86,228,132,212 
DATA.169,08,133,213,76, 160 
DATA-10,179,242,244,124,104 
DATA2202,298 ,251 „240,237 


Eingabehilfe »AMPEL« für Programme in Maschinenspra- 
che. Bitte mit dem Prüfsummer von Seite 60 eingeben. 
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Auf die Kassette, 
fertig, los! 


Benutzer eines Kassettenrecorders dürfen end- 
lich aufatmen. Auch sie können nun die Vorteile 
des »Turbo-Basic« voll nutzen. 


Ile (Atari-Welt spricht vom Turbo-Basic und erfreut 
BR: der immensen Vorteile und erweiterten Fähig- 
MAkeiten gegenüber dem »Atari-Basic« - voraus- 
gesetzt, man verfügtüber ein Diskettenlaufwerk. Werindes 
nur einen Kassettenrecorder sein eigen nennt, stand bis- 
lang im Regen. Die Ladeprozedur des Turbo-Basic war 
nämlich ausschließlich auf Diskettenbetrieb ausgelegt. 
Diesem Mißstand macht das Programm »Turbo-Load« jetzt 
ein Ende. Sollten Sie der Vorzüge des Turbo-Basic noch 
nicht gewahr sein, hier ein paar Appetitanreger: 

Der Turbo-Basic-Interpreter 
- ist voll kompatibel zum Atari-Basic 
- macht auch Atari-Basic-Programme wesentlich schneller 
- erweitert den Befehlssatz um so wichtige Elemente wie 

neue Schleifenformen (DO-UNTIL, WHILE-WEND etc.) 

und Grafik-Kommandos (beispielsweise zum Zeichnen 
von Kreisen und Rechtecken sowie zum Füllen beliebiger 

Flächen). 

Eine vollständige Aufstellung des Befehlsvorrats und der 
Handhabung des Interpreters entnehmen Sie bitte dem 
Beitrag »Basic, schnell wie der Wind« ab Seite 68 dieser 
Ausgabe. 

Geben Sie zunächst das Turbo-Load-Listing mit AMPEL 
ein und speichern Sie es. Auf der gleichen Kassette, genau 


DB128:1F 
2150: 90D 
D138:4C 
2140: 08 
2148:A7 
2150:48 
0158:55 
DB18B: BC 
BIä8:AE 
28179:01 
B178:AF 
BIER: ED 
0188: A9 
DIFO:FE 
BAirB:CC 
D1AG: BE 
g1As:D>3 
Bi1BR: 05 
B1B8:01 
91C9: DB 
B1CB:F1 
91D8:D8 


Frooarammname :D: TURBOL_OA. BIN 
Laenge :?704 Bytes 


220: 0a BE a 07 Z1 987 AF SC 
BROS: B2 DE AFP 21 85 IC AP 
9310:07 85 OD AF 22 55 Di Ar 
2018:07 85 BE 15 &0 BE BO 
De2B:29 393 AZ Da BD 80 
B078:99 BC BD BO Ei FD 
2a30:BD BU ES FD Ba BF 
DBOSBS:ERB A2 BO BD 356 87 
Da4a:AE ES Ed 58 DE 

o948:8D CI 82 

Ba5SB:8D Fa BZ 

BOSS: AZ Da AP 

BRSB:BE BD 44 

BB Ar Ar! 

DBa7B:B8D 47 OF 

92978:A7 95 FTD 

20508:44 05 AF 

nass: 54 FD 4A 

92993:83 22 5& 

BaFB: PH 93 8108: A? 
DaAB: Ar 7D DBIEB:AF A 
DBAB: 48 Ar | B1EB:2D 
BRBB:S& 18 DIFO:885 
BABES: 4C 3E BB BılFS:8F 
BRCD: CD 207 2208:85 
BOCS:FB | AD DR: 85 
Ba00:07 538 AD D210:07 
BEDB:1E Az B218:DB 
BOERB: BF D7 0220:DA 
DRES:E4 10 853 07728: D7 
BOFB:B7 ca Br3d:rE& 
gaFS:B7 58 0238:18 
2198:07 - ED 2242: D0 
B1BS:AD Do?! D748:18 
3112:07 ıiF D2S52: 75 
B118:07 18 0259:37 
91272:053 1E BAD: 50 


hinter Turbo-Load, speichern Sie dann das ebenfalls einge- 
gebene Turbo-Basic. Zum Schutz vor unwiederbringlichen 
Datenverlusten fertigen Sie mindestens eine Arbeitskopie 
von dieser Turbo-Basic-Kassette. Zum Einsatz des Turbo- 
Basic spulen Sie nun die Kassette auf den Anfang von 
Turbo-Load und schalten den Computer ein, während Sie 
gleichzeitig die Tasten <OPTION> und <START> 
gedrückt halten. Hören Sie den Summton, lassen Sie die 
Tasten wieder los und starten den Recorder. Nach einer 
kurzen Ladezeit fordert Turbo-Load Sie auf, die Kassette an 
den Beginn der Turbo-Basic-Datei zu spulen, die Taste 
<PLAY> des Recorders und abschließend <RETURN> 
auf der Computer-Tastatur zu drücken. Eine knappe Vier- 
telstunde später meldet sich Turbo-Basic zur Stelle. 

Der Interpreter ist fest im Computer installiert, auch die 
<RESET >-Taste bringt ihn nicht aus der Ruhe. Geben Sie 
den Befehl »? FRE(0)« ein. Wenn der Computer die Zahl 
»34018« ausgibt, ist alles in Ordnung. (ja) 


Steckbrief 


| Programm: Turbo-Load FE 





2258: 01 
3270:50 
B2778:053 
D2780: 33 
02788:63 
B2F70: FC 
0298: 33 
DZAB: 56 
D2AS:31 
AZBA:581 
B2B8:5C 
D2CcH: 20 
D7CB: >20 
8208: 02 
0>D8:28 
DrEB: 28 
BZES:BC 
BarFB: 20 
MZFB: Z0 
3539:40 
B308:9B : 
2510:78 
9318: 29 
2320: 20 
0328: 7B 
0530: 20 
0338:42 
9549: 20 
93548:728 
0350:39 
D358:4B 
035hR: 73 
23658: 58 
B37B:&0 
23378:7& 
03809:&5 


Listing. »Turbo-Load« 














Mit dem hier vorgestellten Programm lassen sich 
alle für Diskette gedachten Maschinenpro- 
gramme von Kassette laden und starten. 


Programmen auf Diskette. Fast ausnahmslos alle 

Programme, die wir im Heft abdrucken, bekommen 
wir auf Diskette zugesandt. Das allein wäre nicht weiter 
schlimm. Nur, meistens sind die Programme so ausgelegt, 
daß sie nur mit der Diskettenstation zusammenarbeiten. 
Ganz schlimm wird es, wenn wir Maschinenprogramme 
erhalten. Es ist fast unmöglich, die Programme so umzu- 
schreiben, daß sie sowohl mit Kassette als auch mit Dis- 
kette funktionieren. Außerdem müßten wir dann immer zwei 
Versionen abdrucken, einmal für Kassetten- und einmal für 
Diskettenbetrieb. Da wir den Platz im Heft lieber mit ande- 
ren Programmen oder Beiträgen füllen wollen, haben wir 
uns eine elegante Lösung einfallen lassen, die Nachteile 
weder für den Kassetten- noch für den Diskettenbetrieb mit 
sich bringt. 

Tippen Sie das Prögramm mit AMPEL ab und speichern 
Sie es auflhrer Kassette. Unser »COS«, »Cassetten Opera- 
tions System«, wird geladen, indem Sie den Computer aus- 
schalten, die <START>-Taste drücken, je nachdem, ob 
Sie Basic benötigen oder nicht, die <OPTION>-Taste 
betätigen und den Computer dann einschalten. Er meldet 
sich mit einem Hupton. Spulen Sie jetzt die Kassette auf 
den Änfang von COS, schalten den Recorder auf »PLAY« 
und drücken eine Taste am Computer. COS wird nun gela- 
den. Das Programm beansprucht acht Blöcke auf der Kas- 
sette und ist somit schnell im Speicher. COS meldet sich 
mit einem Menü. 


E= ür uns ist das schon ein Problem, die Sache mit den 


AlBR:AF 
23108: 53 
Ai1ld:Ds 
DB11S:EB 
pi2B:E2 
Alz8:8D 
3130: 35B 
A139:44 
91409:07 
9148:053 
0152:07 | 
A15B:A?7 
8150: °D 
0158:03 
A173: FD 
0178:07 
P1l3B: 40 
0188:EB8 
BIFRB: AD 
Bird: 28 
D1AQ: 0? 
gıaAd:Do 
DIEB: sc 
B1BS:AF 
B1CB: 50 
ACH: 5D 
01D2:A7 
81D08:48 
BIEB:S5& 
BLIEB: 28 
niFd:44 | 
BIFE:1D 
D2O0:03 
azB8:48 
0210:03 
3218: ?D 


Froarammname :C0OS.BIN 
Länge :808 Bytes 


nn nn ae em EEE Hm HE EEE ER HE m m m m m m m m mn nn az 


DRa2:ma 07 DO 07'3D 97 #49 IC & 
Baas:8D BZ DE-AF 3D 85 BE AP 
BaR10:07 85 BD AF 48 85 A AR 
Ba18:07 85 BE AP Da BD 34 O2 
DBR@2aA:A? 47 BD 38 97 8D 36 97 
0028:A9 07 BD 39 97 ED 37 07 
B030:18 50 2O 20 BO 2a ma m@ 
2033:00 BD DO OB BR AP 21 8D 
0040:E7 82 A9 DA 8D ES m2 &0 
B048:AF BI 85 895 AZ 002 AF BB 
AaSa:80 42 95 BD FB 22 AP 48 
DAS59:8D 44 03 A9 89 8D 45 83 
OB60:A7 77 ED 48 05 A497 09 8D 
0048:49 03 20 56 E4 2a DA 99 
DE7TO:AD SA 087 C9 AC FO IF C9 
aa76:55 Da 83 40 75 BB Cr? 453 
O080:DR EB A2 MG BE Fu 92. HA 
BO98:8D 48 85 SD 49 03 A9$ 7D 
ar: 20 56 E4 KC FE BF A9F 47 
99F8:8D 38 837 BD 34 B7 AFP BF 
BanG:SD 39 07 SD 37 07 AF ma 
ABAAB:ED 3E B7 BD SC 97 AZ IR 
DOBO:AF DE FD 42 BI AF IF PD 
BOOBS:44 03 A9 GA 9D 45 05 A9 
BECE:24 9D AA OS AFP 8Q FD AB 
BCE: BI Zu 55 E4 AP 47 BD EU 
2009:22 A9 87 SD Ei 02 AZ ı® 
BEDE:AF 07 9D 42 95 A9 32 9D 
HIER: 44 935 AFP 07 ID 45 DE AP 
DOES:02 FD 48 BI AF DR 9D 49 
BOFO:0S 20 56 EA 19 BA CO 56 
BEFB:DO 93 4C 5A O8 AC Cı 88 


Wenn die Kassette 
mit der Diskette 








Drei Funktionen hat COS. Die wichtigste ist die Funktion 
<L>,mitderein File von der Kassette geladen und gestar- 
tet wird. Drücken Sie diese Taste, fordert der Computer Sie 
mit einem Hupton auf, die Kassette auf den Anfang des zu 
ladenden Files zu spulen, ihn wieder auf »PLAY« zu schal- 
ten und eine Taste zu betätigen. »Turbo-Basic« läßt sich mit 
COSleider nichtladen, da Turbo-Basic eine spezielle Lade- 
routine für den Diskettenbetrieb eingebaut hat, die mit Kas- 
sette nicht funktioniert. 

Mit der zweiten Funktion <C> wie »Cartridge« wird zu 
einem eingesteckten Modul gesprungen beziehungsweise 
das Basic gestartet. Verwenden Sie diese Funktion nicht, 
wenn Sie Basic nicht eingeschaltet haben. Der Computer 
hängt sich sonst auf, und Sie müssen ihn mit <RESET> 
wieder ins Diesseits der Bits und Bytes zurückrufen. Diese 
Funktion wird auch zusammen mit dem Prüfsummer ver- 
wendet. Nachdem Sie den Prüfsummer von Kassette gela- 
den haben, müssen Sie irgendwie ins Basic kommen, um 
den Prüfsummer benutzen zu können. Dies geschieht mit 
der Funktion <C>. 

Als letztes steht die Funktion <S> zur Verfügung, mit 
der ein geladenes Programm nochmals gestartet wird. 
Nützlich ist dies bei verschiedenen kleinen Demonstra- 
tionsprogrammen, die nach getaner Arbeit wieder ins COS 
zurückkehren. (hf) 











Dar Zen. ı', ‚Steckbrief 
| Programm: | 





| Sprache: | Maschinensprache | n 
Eingabehilfe: | AMPEL 


2B220:20 55 Ar 07 42. 
0228:AF 3A 44 85 AF 07 
0250:45 853 Bi SD 85 
2238:09 FD 47 85 20 E4 
B240:0C 7D 23 28 E4 
0248:7D 48 7a 78 =D 
8250:5F &D 73 74 72 
0258:45 4F 22 28 41 
2B260:41 52 za 56 72 
025689:6897 &F 20 51 58 
BZ7U:6F 70 72 67 68 
0278:20 28 553 27 28 7 
2288:37 28 77 20 55 
0288:72 659 298 45 73 
0278:58 ?B =B 4C z& 
0298:597 5C 20 7& SE 7 
BzAB:43 81 73 73 65 74 74 
BZAB:ZB Sc 64 &5 &E 98 
B2B8:55 5D 47 65 &6C 61 
B82E8:65 5E sE 20 45 59 
22C08:&5 20 7/4 51 72 74 
B7CS:4E FB SB 453 5D 20 47 
82D0:58 55 an 75 72 20 
2u2D8:51 72 72 89 564 57 
BZEB:FB FB 46 65 68 &C 
BZES: 72 20 85 59 db 28 
BZFB:&1 &4  dE 20 7Tü 4F 
GB7FS:28 4B 73 753 65 74 
n5a0:&45 FB | 9B A456 55 58 
0308:85 72 =D 20 &B 55 
BF1QB:5E 20 44 AF 53 Z0 32 
835198:39 28 597 56 55 96 
0328:4B DB DO aa Da Bu 


Listing. »COS«, mit AMPEL 
eingeben 


<AD> 
<BF> 
<62> 
<95> 
<3F> 
<TT> 
<a9> 
<4F> 
xAB> 
<38> 
<22> 
<62> 
<FZ > 
<EE> 
EB > 
<cC> 
277 
<F8> 
<17> 
<1B- 
<96> 
 <89> 
<Br7}> 
<F3> 
AS» 
<SF> 
<F9> 
84> 
<38> 
<B7> 
37 > 
<aD> 
<1D> 
<FC> 
<47> 
<4F> 














Basic, schnell wie 
der Wind - mit dem Turbo- 
Basic-XL-Interpreter 





Ist Ihnen Atari-Basic zu langsam? Oder wün- 
schen Sie sich zusätzliche Befehle? Dann ist 
unser Turbo-Basic-Interpreter genau das richtige 
Programm für Sie. 


reich. Immerhin müssen insgesamt 18108 Byte erst 
einmal eingetippt sein. Eine Aufgabe, die sicher 
einige Stunden in Anspruch nimmt. Haben Sie aber dann 
den Interpreter auf Diskette vorliegen, sparen Sie sich 
zukünftig viel Zeit für die Entwicklung neuer Programme. 
Erstens stehen Ihnen sämtliche Befehle des normalen 
Atari-Basic zur Verfügung, und zweitens gewinnen Sie durch 
die neuen Befehle viel Zeit und vor allem Speicherplatz. 

Aber Turbo-Basic XL spart nicht nur Zeitbei der Program- 
mierung, sondern auch bei der Ausführung von Program- 
men. Es macht seinem Namen als schnellstes derzeit 
erhältliches Basic für Atari-Computer nämlich alle Ehre. 
Wir haben unseren Interpreter dem normalen Basic und 
verschiedenen Basic-Compilern gegenübergestellt. Turbo- 
Basic XL siegte in jeder Hinsicht. 

Damit Sie mit Turbo-Basic XL und dem dazugehörigen 
Compiler arbeiten können, benötigen Sie unbedingt einen 
Atari B00XL oder 130XE. Besitzer der älteren Computer, 
also Atari 400 und 800, können den Interpreter leider nicht 
benutzen. In der abgedruckten Version setzt Turbo-Basic 
XL mindestens 64 KByte RAM voraus. 

Beachten Sie bitte: Turbo-Basic XL muß unbedingt mit 
AMPEL (Atari-Maschinen-Programm-Eingabe-Listing) ein- 
gegeben werden. Von Basic aus läßt sich Turbo-Basic XL 
nämlich nicht eingeben. Wenn Sie alle dazugehörigen 
Erklärungen befolgen, kann nichts schiefgehen. 





y Ah unser Interpreter ist ein wenig umfang- 


Besondere Hinweise 
zu Turbo-Basiec XL 


Turbo-Basic XL ist als »AUTORUN.SYS«-File ausgelegt. 


Das heißt, wenn Sie den Interpreter komplett eingegeben 


haben, können Sie Ihrem File einfach den Namen »AUTO- 
RUN.SYS« geben. Nach dem Einschalten des Computers 
wird dann automatisch Turbo-Basic XL geladen. Anschlie- 
Bend können Sie auch schon mit dem Interpreter arbeiten. 
Einzige Woraussetzung: Die Files »DOS.SYS« und 
»DUPRSYS« (entweder DOS 2.0 oder 2.5) müssen sich auf 
der gleichen Diskette befinden. Mit DOS 3.0 arbeitet Turbo- 
Basic XL übrigens nicht! 

Hier noch einige Hinweise, wie Sie einen Dateinamen auf 
Diskette ändern können. 

Nehmen wir an, Sie haben Ihrem Interpreter bei der Ein- 
gabe mit AMPEL den Namen »TURBO« gegeben. Dieses 
File soll nun den Namen »AUTORUN.SYS« erhalten. Ent- 
fernen Sie also zunächst Ihre Turbo-Basic-XL-Diskette und 
schalten Sie bitte den Computer aus. Nachdem Sie eine 
formatierte Diskette, auf der sich die Files »DOS.SYS« und 
»DUPSYS« befinden, ins Laufwerk gelegt haben, schalten 
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Sie den Computer wieder ein. Anschließend geben Sie 
»DOS« ein und gelangen über die <RETURN >-Taste ins 
DOS-Menü. Nun rufen Sie auf der Turbo-Basic-XL-Diskette 
mit »E« die Funktion »Rename File« auf und drücken 
<RETURN>. Die Meldung »Give - Old Name, New 
Name« erscheint. Geben Sie _ beispielsweise 
»TURBO,AUTORUN.SYS« ein. Sollte Ihre Datei einen ande- 
ren Namen haben, müssen Sie diesen anstelle von 
»TURBO« einsetzen. Nach Betätigung der 
<RETURN >-Taste wird Ihr File umbenannt und hat dann 
den Namen »AUTORUN.SYS«. Überzeugen Sie sich, daß 
der soeben beschriebene Vorgang auch wirklich funktio- 
niert hat. Mit »A« für Directory und <RETURN> wird das 
neue Directory auf dem Bildschirm angezeigt. Folgende 
Programme sollten sich jetzt auf Ihrer Diskette befinden: 
DOS.SYS, DUPSYS und AUTORUN.SYS. 

Noch eins, bevor Sie mit Turbo-Basic XL arbeiten: Sie 
sollten sich mindestens eine Sicherheitskopie Ihrer Dis- 
kette anlegen. Nehmen Sie sich also eine neue oder eine 
Diskette, die Sie löschen können, und formatieren Sie 
diese. Falls Sie über DOS 2.5 verfügen, können Sie sich 
das Formatieren sparen. Mit der Funktion »J« im DOS- 
Menü wird nun die Diskette kopiert. Wenn Sie ein Disketten- 
laufwerk besitzen, geben Sie jetzt »D1,Di« ein und betäti- 
gen daraufhin die <RETURN >-Taste. Der Kopiervorgang 
beginnt. Dabei werden Sie mehrmals aufgefordert, die 
Original-Diskette mit der Duplikat-Diskette auszutauschen. 

Sie haben jetzt also zwei Disketten vorliegen, die exakt 
die gleichen Programme enthalten. Arbeiten Sie aber bitte 
nur miteiner der Disketten und legen Sie die andere aneine 
sichere Stelle. 

Nach dieser Sicherheitsmaßnahme können Sie endlich 
Turbo-Basic XL ausprobieren. Dazu muß sich nur Ihre Inter- 
preter-Diskette im Laufwerk befinden. Schalten Sie jetzt die 
Stromversorgung Ihres Computers aus und wieder ein. 
Wenn Sie dabei keine Taste, auch nicht die 


Fl 

De PROC RECHKREN 

ı@eL GRAPHICS 15+15:POKE 764,755 
DH=ZCHMAX -KMHEMI 715% 
DYZ-CYFrEX-YPIINI/191 
CHZZMIR: CYZYmMaH 
FOR ZEILE=8B TO 191 

ee To ruL 


ai 0 
nz Fr 2= YErZ: TI=-TIrL 
IF TI=STmAHX 


COLOR 78 


COLOR <STI mOb ZS7+%1 
EMDIF 
CRZCHFDH: PLOT SPALTE, ZEIEE 
If PEEK (7643-23 THEN POP :69T 


MEHT SPALTE 
CHZAPIEN:CY 





<OPTION >-Taste, mit dernormalerweise das eingebaute 
Basic abgestellt wird, betätigt haben, erscheint das Titel- 
bild und kurz danach die READY-Meldung. Sie befinden 
sich jetzt in Turbo-Basic XL. Viel Spaß beim Programmie- 
ren! 


Strukturierte Programmierung 


In der folgenden Beschreibung bedeuten: 
aexp=arithmetic expression (arithmetischer Ausdruck) 
sexp=string expression (Text Ausdruck (A$, TEXT”, 
CHR$O, STR$(, HEX$0) 
lineno=Zeilennummer 
»...«=Ein oder mehrere Befehle. In einer IF- THEN-Abfrage 
handelt es sich hierbei um den nach THEN folgenden Text. 
Sonst gibt es keine Beschränkung. »...« kann also auch 
mehrere Programmzeilen und/oder den Teil einer Pro- 
grammzeile umfassen. 

Es gibt im Standard-Atari-Basic nur zeilennummerorien- 
tierte Sprungbefehle und die »FOR...NEXT«-Schleife zur 
Konstruktion von Schleifen. In Turbo-Basic gibt es zusätz- 
liche, an Pascal angelehnte Strukturelemente. 

IF aexp THEN lineno 
IF aexp THEN ... 
Das normale IF...THEN Statement. 


IF aexp ... ENDIF 
IF aexp ... ELSE ... ENDIF 

Wenn die Bedingung aexp erfüllt (< >0) ist, wird der Pro- 
grammteil zwischen IF und ELSE, sonst der zwischen 
ELSE und ENDIF ausgeführt. ELSE kann auch entfallen. 
Als Trennzeichen nach aexp dient nicht THEN, sondern ein 
Doppelpunkt (:) oder Zeilenende (RETURN). Auch vor und 


nach ELSE und ENDIF muß ein solches Trennzeichen ste- ' 


hen. Nach ELSE darf keine Zeilennummer folgen. In Atari- 
Basic benötigt man dafür oft mehrere GÖTO-Befehle. 
REPEAT ... UNTIL aexp 


Wiederholt die Anweisungen »...«, bis die Bedingung | 


erfüllt ist. Hier wird die Bedingung erst am Ende der 
Schleife geprüft. Der Programmteil zwischen REPEÄT und 
UNTIL wird also mindestens einmal ausgeführt. 

WHILE aexp ... WEND 


Wiederholt »...«, solange die Bedingung erfüllt ist, das 


heißt, wenn die Bedingung das erste Mal nicht erfüllt ist, 
wird die Schleife kein einziges Mal ausgeführt. 
DO ... LOOP 

Endlosschleife. Wiederholt die Anweisungen »...« immer 
wieder von neuem. 
EXIT 

Verläßt eine Schleife, Sprung ans Schleifenende. Dieser 
Befehl ist verwendbar bei »DO ... LOOP« und »REPEAT ... 


UNTIL«, »WHILE ... WEND« und auch bei »FOR ... NEXTe- 


Schleifen. Dieser Befehl stellt eine Art Notausgang aus 
Schleifen dar, bei »DO ... 
in strukturierten Programmen erlaubt ist. Es wird stets an 
das Ende der Schleife gesprungen. Eine Schleife läßt sich 
auch mit »POP:GOTO lineno« abbrechen. Dies sollte 
jedoch nur im Notfall geschehen, da dieser Befehl nicht zur 
übersichtlichen Programmierung beiträgt. 
*kF 
*AF+ 

Nach diesem Befehl sind »FOR ... NEXT«-Schleifen 
abweisend. Es wird also vor dem ersten Durchlauf der 
Schleife geprüft, ob der Zähler schon den Endwert erreicht 
hat. Dazu ein Beispiel: »FOR I=2 TO 1:? I:NEXT I«. 
1. Der Anfangswert der Schleife ist 2 
2. Schleifenzähler um 1 erhöhen 
3. Vergleich mit dem Endwert (1) 
4. Verlassen der Schleife, da die Bedingung erfüllt ist. 





LOOP« sogar den einzigen, der | fi 


| HEISSESSSOF TWARE 
| ZUEBÖLEN PREISEN! 


NEUES DNE)\= 


Arkanoid 
NFZIGWANOLSTS 


sjolslel-I@BEKJa 
Constr. Kit 


Colossus Chess 


Kassette 


2395 
26.9 


20,95 
PAoRsIo) 


Deeper Dungeons 12,95 


Gauntlet 
House of Usher 
Knockout 


206,95 
9.99 
393 


Leaderboard Golf 2695 


BNlelemBrinlielsic: 


Mercenary 
Sejastolziatelldien 


Quiwi 

Shoot ’Em Ups 
SlurSjehnliche 
sjo]lale1y2AN, 

Spy VS. Spy 3 
Slultz@erliath 
The Pawn 
UelleEre 


MADE IN GERMANY : 


EN A | 
SOZIE 


ISSN 
VILLA 


26,95 


38,99 


26,95 
26,95 
20,95 
26,95 


BIELERE 


CLRSK) 
38,95 


38,95 
38,95 
18,95 
38,95 
14,95 
14,95 
38,99 
38,95 


92.98 


4995 


38,95 
38,95 
38,95 
38,95 
92.99 
34,95 


KINGSOFT 
:F. Schäfer - Schnackebusch 4 
5106 Roetgen 



































Nach &XF + wird zuerst die Variable I mit dem Anfangs- 
wert 2 geladen und dann mit der Variablen I (Endwert=1) 
verglichen. Anschließend wird die Schleife bis zum »NEXT 
I«-Befehl übersprungen. Es erfolgt keine Ausgabe auf dem 
Bildschirm. Der »F-+«-Befehl erspart oft eine spezielle 
Abfrageroutine. 

AF- 

Stellt den Normalzustand wieder her. »FOR ... NEXTe«- 
Schleifen werden mindestens einmal durchlaufen. Auch 
bei RUN wird automatisch ein »#*F -« ausgeführt (ent- 
spricht dem Atarı-Basic). 

PROC name 

Beginn eines Unterprogramms (Prozedur) mit dem 
Namen name. 

ENDPROC 

Prozedurende. Entspricht dem RETURN nach einem 
»GOSUB lineno«. 

EXEC name 

Ruft die Prozedur name auf, entspricht »GOSUB lineno«. 
Die normalen Befehle GOSUB und RETURN erlauben, nur 
Unterprogramme mit einer Zeilennummer aufzurufen. Hier 
ist der Aufruf mit einem leichter zu behaltenden Namen 
möglich. Außerdem belegt EXEC-PROC-ENDPROC meist 
sogar weniger Speicherplatz als GOSUB-RETURN und ist 
etwas schneller. Die Prozedurnamen werden genauso 
gespeichert wie die Variablennamen. Jeder Name belegt 8 
Byte plus ein Byte für jedes Zeichen. Jede weitere Verwen- 
dung benötigt dann nur ein (zwei) Byte. Die Zeilennummer 
einer GOSUB-Anweisung belegt dagegen 7 Byte. Obwohl 
Turbo-Basic XL kompatibel zu Atari-Basic ist, können statt 
128 jetzt 256 verschiedene Variablen- oder Prozedur- 
namen verwendet werden. Ab der 129sten Variablen kostet 
jede Verwendung zwei statt bisher nur 1 Byte Speicher- 
platz. 

ON aexp EXEC pname,pnam... 

Entspricht der Atari-Basic-Anweisung »ON GOSUB«. 

pnam=PROCedurname. 

# name 

GOÖ# name 

ON aexp GO # nam,nam,nam 
TRAP #name 

RESTORE # name 

Labeldefinition, das # entspricht dem PROC. In Turbo- 
Basic XL laßt sich der unstrukturierte Sprungbefehl GOTO 
wenigstens dadurch lesbarer machen, daß »GOTO zeilen- 
nummer« durch »GO # name« ersetzt wird. Auch bei TRAP 
und RESTORE können Marken verwendet werden. Dabei 
wird die Kennung » #« verwendet, um dem Interpreter mit- 
zuteilen, daß keine Zeilennummer, sondern ein Name folgt. 
Übrigens ist »GO # name« schneller als »GOTO zeile«. Die 
Marken für GO #, TRAP # und RESTORE # werden mit # 
gekennzeichnet, die für EXEC mit PROC. Diese strikte 
Trennung dient zur Erhöhung der Gliederung und Transpa- 
renz von Programmen. 

POP 

POP gilt für Unterprogramme mit GOSUB und EXEC 
ebenso wie für die Schleifen »FOR ... NEXT«, »REPEAT ... 
UNTIL«, »WHILE ... ENDWHILE« und »LOOP ... END- 
LOOP«,. Auf dem Runtimestack belegen GOSUB, EXEC, 
REPEAT, WHILE und LOOP jeweils 4 Byte (wie GOSUB in 
Atari-Basic). »FOR ... NEXT« belegt jedoch 13 statt 12 Byte, 
da jetzt 256 verschiedene Variablen zur Verfügung stehen. 
Auf dem Stack werden jetzt aber nicht mehr die Zeilennum- 
mern gespeichert, ein Grund für das langsame Ätari-Basic, 
sondern die Speicheradressen dieser Zeilen. Dadurch wer- 
den Schleifen schneller. Außerdem sinkt die Geschwindig- 
keit der Schleifenwiederholung nicht mit steigender Entfer- 
nung vom Programmanfang! Trotzdem konnte einer der 


gramm, das beispielsweise durch einen Programmfehler 
angehalten wurde, kann man editieren und dann mit CONT 
oder GOTO fortsetzen. Dabei werden weder die Variablen 
noch der Stack gelöscht. So lassen sich auch Programme 
schreiben, die ihre DATA-Zeilen selbst generieren oder 
nicht mehr benötigte Programmteile löschen (mit POKE 
842,13, danach verhält sich der Computer so, als würde 
ständig RETURN gedrückt, bis POKE 842,12 den Normal- 
zustand wieder herstellt). Zum Löschen von Programmtei- 
len gibt es in Turbo-Basic XL den DEL-Befehl. 

Dies ist eine spezielle REM-Anweisung. Bei der Eingabe 
einer Programmzeile wird alles nach »- -« nicht beachtet. 
Bei LIST werden aber nicht 2, sondern 30 Minuszeichen 
gedruckt. Diese Anweisung belegt sogar ein Byte weniger 
Speicherplatz als ein REM ohne Text. Eine entsprechende 
REM-Zeile im normalen Basic benötigt wesentlich mehr 
Speicherplatz. 

LIST 

Beim LISTen von Programmen werden Schleifen optisch 
durch Einrücken um jeweils zwei Leerzeichen hervorgeho- 
ben. Programme sind so übersichtlicher und strukturierter. 
Außerdem lassen sich auf diese Art und Weise manche 
Fehler vermeiden. Bei unsauberer Programmierung (meh- 
rere NEXT zu einem FOR, mehrere ENDPROCSs zu einem 
PROC...) gerät das Listing, ebenso wie der Interpreter, 
allerdings in Unordnung. Solche Konstruktionen, die ın 
Atari-Basic und vielen anderen Basic-Versionen nur 
schwer zu umschreiben sind, können in Turbo-Basic XL 
leicht durch IF-ELSE-ENDIF oder EXIT ersetzt werden. 
Daraus resultieren wieder leichter lesbare Programme. 
kL- 
schaltet die Tabulierung ab. Dies kann notwendig sein, um 
lange Programmzeilen zu editieren oder um Platz beim 
Speichern auf Diskette (LIST ”D:X”) zu sparen. Die Irenn- 
zeile »- -«wirdnach»%xL-« nur als doppeltes statt dreißigfa- 
ches Minus-Zeichen gelistet. 

AL 

AL + 

schaltet die Tabulierung wieder ein (Normalzustand nach 
dem Laden des Interpreters). Übrigens gibt es jetzt auch 
ein LIST von einer Programmzeile bis zum Programmende. 
»LIST 3000,« listet ab Zeile 3000 bis zum Programmende, 
»LIST”P:” 3000,« entsprechend auf den Drucker (das ein- 
zelne Komma »,« nach der Zeilennummer veranlaßt den 
Computer, automatisch 32767 für die höchstmögliche Zei- 
lennummer zu ergänzen). 


Neue Fehlermeldungen 


Es gibt folgende neue Fehlermeldungen: 
ERROR - 22 ?NEST 

Schachtelungsfehler, tritt auf, wenn das zu einem WHILE 
gehörende ENDWHILE nicht gefunden wird, oder das 
ENDIF zu einem IF, oder auch, nach»%&F +«, das NEXT zu 
einem FOR. Beim Verlassen von Unterprogrammen (durch 
RETURN oder ENDPROC) werden Schleifen abgebro- 
chen, dies gilt sowohl - wie gewohnt - für die »FOR. ... 
NEX TI«-Schleife, wie auch für die anderen unter Turbo- 
Basic XL zur Verfügung stehenden Schleifen. 
ERROR - 16 ?GOSUB 

Zu einem GOSUB fehlt RETURN. 
ERROR - 13 ?FOR 

Zu einem NEXT fehlt FOR. 
ERROR - 23 ?WHILE 

Zu einem WEND fehlt WHILE. 
ERROR - 24 ?REPEAT 

Zu einem UNTIL fehlt REPEÄT. 


Vorzüge von Atari-Basic beibehalten werden: Ein Pro- 
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ERROR - 25 ?DO 

Zu einem LOOP fehlt DO. 
ERROR - 28 ?EXEC 

Zu einem ENDPROGC fehlt EXEC. 
ERROR - 29 ?PROC 

Eine unbekannte Prozedur wurde aufgerufen. 
ERROR - 30 ? # 

Eine unbekannte Marke wurde verwendet. 
ERROR - 27 XPROC 

(Executing PROC). Diese Fehlermeldung tritt auf, wenn 
eine PROC-Anweisung ausgeführt wird. Prozeduren dür- 
fen nur von EXEC aufgerufen werden. 
ERROR - 26 ?EXIT 

EXIT ohne Schleife. 
ERROR - 15 ?DEL 

Das GOSUB zu einem RETURN, NEXT zu einem FOR, 
REPEAT zu einem UNTIL ... wurde gelöscht. In Atari- und 
in Turbo-Basic XL lassen sich Programme editieren, ohne 
Variablenwerte oder den Stapel zu zerstören. Wenn dann 


bei Rückkehr aus einem Unterprogramm (Schleife) die ent- 


sprechende Zeile gelöscht oder verändert wurde, kann die- 
ser Fehler passieren. Dies tritt auch auf, wenn ein in ein 
Programm eingebautes DEL sich selbst löscht. Alle Fehler- 
nummern, die Atari-Basic ohne irgendwelche Texte aus- 
gibt, werden in Turbo-Basic XL grundsätzlich miteinem kur- 
zen Text ergänzt (beispielsweise »138 TIMEOUT«, »29 
?PROC« etc.). Ausführlichere Erläuterungen können dem 
Atari-Basic Referenz Manual oder der DOS-Anleitung ent- 
nommen werden. Längere Texte würden, bei den insge- 
samt 60 zur Verfügung stehenden Fehlern, den Platzbedarf 
des Interpreters noch wesentlich erhöhen. 
DEL von,bis 

Löscht die Programmzeilen von - bis (jeweils ein- 
schließlich). 
RENUM alt,neu,incr 

Numeriert alle Programmzeilen ab Zeile alt um. Die 
neuen Zeilennummern beginnen bei neu und werden 
jeweils um incr erhöht. Alle Zeilennummern vor alt bleiben 
unverändert. Dieser Befehl ändert auch die Zeilennum- 
mern nach GOTO, GOSUB, TRAP, RESTORE, LIST, DEL, 
ON-GOTO und ON-GOSUB. Bei Verwendung undefinierter 
Zeilennummern wird die entsprechende negative Zahl ein- 
gesetzt (beispielsweise GOTO-100). Bei berechneten 
Sprüngen (GOTO VAR, GOSUB 100+10%A, RESTORE 
Ax%*10+1000) versagt RENUM. Wenn hinter dem Befehl 
eine Zahl folgt »GOTO 1000+A & 10«, wird die Zahl wie bei 
einem normalen Befehl »GOTO 1000«behandelt. Der nach- 
folgende Programmteil der Zeile bleibt jedoch unverändert. 
Wenn keine Zahl, sondern ein Variablenname oder eine 
. Klammer folgt, wird der Befehl überhaupt nicht verändert. 


DUMP 
DUMP filespec 

Dieser Befehl erzeugt eine Liste der verwendeten Varia- 
blen. Wie bei LIST kann die Ausgabe auch auf einem 
Drucker erfolgen (DUMP ”P:”). 


Ein Beispiel: 

A = 100 numerische Variable 

Bt 10,1 Array, DIM B(9) oder DIM B(9,0) 

C(00 undimensioniertes Array. Bei Arrays werden 
die beiden möglichen Dimensionen stets 
um 1 erhöht angezeigt. 

D( 10,10 DIM D(9,9) 

E$ 10,20 String, LEN=10, DIM E$(20) 

F$ 0,0 nicht dimensionierter String 

G$ 0,10 DIM G$(10), LEN(G$)=0 

H PROC 100 PROC H in Zeile 100 

| # 120 Marke I in Zeile 120 

J? Undefinierte Marke oder PROC 





























Fa 


Die Ausgabe der Variablen/Marken erfolgt in der Reihen- 
folge, wie sie in der Variablentabelle gespeichert sind. 
TRACE 
TRACE + 

Schaltet den TRACE-Modus ein. Das heißt, die Nummer 
jeder ausgeführten Zeile wird in eckigen Klammern auf 
dem Bildschirm ausgedruckt. 

TRACE - 

Hebt TRACE wieder auf. Der TRACE-Modus wird außer- 
dem aufgehoben, sobald eine Fehlermeldung auftritt. Die 
Zeilennummern eines PROC oder # werden bei Aufruf mit 
EXEC oder GO # nicht ausgegeben. 
ikB 
kB + 

Nach diesem Befehl wird das Drücken der <BREAK>- 
Taste wie jeder andere Fehler behandelt. Eine Program- 
munterbrechung läßt sich mit TRAP abfangen und so vor 
einer versehentlichen Unterbrechung schützen. 
kB- 

Hebt den oben erwähnten Modus wieder auf. Bei RUN 
wird »%B -« automatisch ausgeführt. 


Befehle 

Erläuterung: 
<= > steht für: entspricht im normalen Basic 
DPOKE adr,word 

Doppel-Byte-POKE <= > POKE adrword-256 # INT(wort/ 
256):POKE adr+1,INT(wort/256) 
MOVE source,dest,count | 

Blocktransfer <=> FOR I=0 TO COUNT-1:POKE dest+ 
,PEEKf(source+1):NEXT | 

Mit »MOVE 57344, NEUCHARSET,1024« läßt sich bei- 
spielsweise der Zeichensatz kopieren. 
-MOVE source,dest,count 

Blocktransfer, zuerst wird das letzte Byte verschoben. 
Dies ermöglicht, einen Speicherbereich zu einer höheren 
Adresse zu verschieben, ohne daß es bei Überlappungen 
(wenn source+count>dest) zu Zerstörungen kommt. 
<= > FORI=COUNT-1 TOO STEP -1:POKE dest+1,PEEK 
(source-+l1):NEXT I. MOVE kann auch benutzt werden, um 
einen Speicherbereich zu füllen. Beispiel: »POKE 
DPEEK(88),128:MOVE - DPEEK(88),DPEEK(88)-+1,959«. 
Dies schreibt den Textbildschirm mit dem Bildschirmcode 
für das inverse Leerzeichen voll. Obwohl hier viele, eigent- 
lich unnötige Ladevorgänge stattfinden, ist dies viel schnel- 
ler als eine Basic-Schleife. 
BPUT #n,adrlen 

Blockschreiben <= > FOR 1I=0 TO len-1:PUT #n,PEEK 
(adr+I):NEXT I 
BGET #n,adrien 

Blocklesen <=> FORI 
adr+1,A:NEXT I 

Mit diesen Befehlen kann man Speicherbereiche mit 
maximaler Geschwindigkeit speichern und laden. Beispiel: 
OPEN #1,8,0,” D:BILD.PIC”:BPUT #1,DPEEK(88),7680: 
CLOSE #1 
OPEN #1,4,0,” D:BILD.PIC”:BGET #1,DPEEK(88),7680: 
CLOSE #1 

Speichern oder Laden eines Grafik-8-(oder 9,10,11,15}- 
Bildes auf Diskette. Achtung: Die Zahl 7680 muß je nach 
Grafikmodus geändert werden (sonst werden nicht mehr 
zum Bildspeicher gehörende Speicherbereiche mit- 
gelesen oder -geschrieben) 
%PUT 

Mit diesem Befehl lassen sich Zahlen schneller und kom- 
pakter auf Diskette oder in einer RAM-Disk speichern. 
Dabei werden immer sechs Byte gepeichert. 


=0 TO len-1:GET #n,A:POKE 
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Zum Lesen von Zahlen, die mit %PUT auf ein Speicher- 
medium gespeichert wurden. Ein Beispiel für die Anwen- 
dung von %PUT und %GET finden Sie auf Seite 70. 
FILLTO x,y 

Kurzschreibweise, schneller und übersichtlicher als: 
»POSITION x,y:XIO 18, #6,0,0, ”S:”"FCOLOR n« 

Wählen der Farbe für FILLTO. In Standard-Basic heißt 
dieser Befehl »POKE 765,n«. 

CLS 
CLS #6 

Bildschirmlöschen. CLS <=> A=PEEK(766):POKE 
766,0:POSITION 0,0:? (#6;)CHR$(125);:POKE 766, A 
PUT n 

<= > ?CHR$(n); beispielsweise »PUT 253« für»? CHR$ 
(253);«. Bei PUT, GET, INPUT... ist auch die Angabe » #0« 
möglich. Die Benutzung von »IOCB 0« (mit »CLOSE« oder 
»OPEN #0«) verhindert allerdings das ordnungsgemäße 
Arbeiten des Bildschirm-Editors, gegebenenfalls 
<SYSTEM-RESET> drücken. Fehlt bei PUT die 
#-Angabe, so wird automatisch »IOCB #0« benutzt. 
GET KEY 

<=> OPEN #740,’K:”":GET #7,KEY:CLOSE #7. 
Wartet auf Tastendruck und weist der Variablen KEY den 
ATASCII-Wert der gedrückten Taste zu (der Variablenname 
ist frei wählbar). 

DIM 

Beim DIM-Befehl werden Arrays und Strings automa- 
tisch gelöscht, also auf O gesetzt. DIM A(100) <= > DIM 
A(100):FOR I=0 TO 100:A(l)=0:NEXT | 
INPUT "text" varvar... 

INPUT "text ” ;varvar... 

INPUT ähnelt jetzt sehr stark dem entsprechenden 
INPUT-Befehl unter Microsoft-Basic. Ein Text nach INPUT 
erspart die sonst nötigen PRINT-Befehle. Folgt nach dem 
Text ein Semikolon statt eines Kommas, so wird zusätzlich 
ein ? ausgegeben. Mit »INPUT ” ";As erreicht man ein Input 
ohne das manchmal störende »?«. 

TEXT x,y,sexp 
TEXT x,y,exp 

Schreibt einen Text in ein Grafik-Bild. »x,y« stellt die Posi- 
tion deroberen linken Ecke des ersten Zeichens des String- 
Ausdrucks (wird in Bildpunkten gezählt) dar. Beispiel: 
»GRAPHICS STEXT 50,90, "Turbo-Basic” TEXT 
70,95,1000«, Im Gegensatz zum normalen PRINT-Befehl 
darf nach TEXT nur ein Ausdruck erfolgen (keine Liste mit 
Komma oder Semikolon). Außerdem werden Texte am Zei- 
lenende abgebrochen, es gibt auch kein Scrolling. 
CIRCLE x0,yO,r 
CIRCLE xO,yO,xr,yr 

Zeichnet einen Kreis um den Punkt x0,y0 mit dem Radius 
r. Bei Angabe zweier (unterschiedlicher) Radien für die 
x- und y-Richtung entstehen Ellipsen. 

PAINT x,y 

Füllt eine geschlossene Figur, beispielsweise einen 
Kreis, mit der mit COLOR gewählten Farbe. Dieser Befehl 
kann fast jede beliebige Figur mit einer bestimmten Farbe 
füllen. Da hierbei eine für den 6502 angepaßte, rekursive 
Funktion benutzt wird, ist der Komplexität der auszufüllen- 
den Figur durch den freien Speicherplatz eine Grenze 
gesetzt. Im Extremfall würde ein Arbeitsbereich von etwa 
90 KByte RAM benötigt. Auch einfache und kleinere Figu- 
ren belegen vorübergehend einige hundert Byte. Sollte der 
Speicher überlaufen (FRE(0) zu klein), so gibt es die Fehler- 
meldung »ERROR - 2 MEM«. Die PAINT- und die TEXT- 
Routine benutzen eigene, schnelle Plot-Routinen, da hier- 
bei viele nebeneinander liegende Punkte relativ einfach 
berechnet werden können. Hiervon machen die Routinen 
im Atari-Betriebssystem leider keinen Gebrauch. 
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TIME$= siehe unten 
PAUSE n 

Unterbricht die Programmausführung für n/50-Sekun- 
den. PAUSE ersetzt das ungenaue und speicherplatzfres- 
sende Timing mit leeren FOÖR-NEXT-Schleifen. In Atari- 
Basic wird oft die Potenzierung (A=1"1) für eine kleine Ver- 
zögerung benutzt. Da Turbo-Basic XL bei der Potenzierung 
besonders schnell ist, sollte dafür beispielsweise »PAUSE 
9« benutzt werden. 
DSOUND voice,;freqg,dis,vol 

Ahnlich dem normalen SOUND-Befehl. Der Atari- 
Computer kann zwei normale Stimmen zu einer zusam- 
menfassen. Die Frequenzauflösung beträgt dann 16 Bit 
(0..65535) statt 8 Bit (0..255). Die resultierende Frequenz 
berechnet sich (in Hertz) zu: 1789790/(2 x freq+14) statt 
sonst 63921/(2 x freq+2). Diese Werte stammen aus einer 
amerikanischen Veröffentlichung und unterscheiden sich 
eventuell etwas von den Werten bei den deutschen Altari- 
Versionen, da sie von der Videofrequenz abgeleitet sind, 
die in den USA einen anderen Wert besitzt (siehe auch 
Seite 124). 
DSOUND 

Kurzform für: FOR I=0 TO 3:5SOUND 1,0,0,0:NEXT I 
CLOSE 

Kurzform für: FOR I=1 TO 7:CLOSE #I:NEXT I 


Funktionen 
DPEEK(adr) 
Doppel-Byte-PEEK <=> PEEK(adr)+256% PEEK 
(adr+1) 
INKEY$ 


Spezialvariable. Wenn eine Taste gedrückt wird, enthält 
INKEY$ das entsprechende Zeichen. Wenn nicht, enthält 
sie einen Leerstring (” ”). So läßt sich ein Tastendruck ver- 
arbeiten, ohne den Programmablauf zu unterbrechen. 
INSTR(A$,B$) 

INSTR(A$,B$,i) 

Sucht einen String B$ in einem (längeren) String A$. 
Wenn gefunden, wird die Position von B$ in A$ zurückgelie- 
fert, sonst eine Null. »i« stellt den Index (Position) dar, ab 
dem die Suche beginnen soll. 

UINSTR(A$,B$) 
UINSTR(A$,B$;,i) 

Ahnlich INSTR. Die Bits 7 und 5 der einzelnen Zeichen 
werden nicht beachtet. Bei der Suche nach »MODEM läßt 
sich so auch »Modem«, »MoDeM« oder der entsprechende 
inverse Text finden (UINSTR steht für UppercaselNSTR). 
Als Nebeneffekt werden bei der Suche nach Zahlen oder 
Satzzeichen auch die Spezial-Zeichen gefunden 
(”1"=CTRL-A, "0”=CTRL-P etc.). 

ERR 

Kurzform für »PEEK(195)« zur Ermittlung des Feh- 
lercodes. 
ERL 

Kurzform für »PEEK(186)+256% PEEK(187)« oder 
»DPEEK (186)« zur Ermittlung der Zeile, in der ein Fehler 
aufgetreten ist. ERR und ERL sollten in TRAP-Routinen 
verwendet werden. 

TIME 

Spezialvariable, enthält die Zeit (vom internen Timer 
RTICLOCK des Atari-Computers, ausschlaggebend sind 
die Speicherzellen 18 bis 20) in 1/50-Sekunden. 

TIME$ 

Spezialvariable, enthält die Zeit als sechsstelligen String 
im Format hhmmss (hh=Stunde 00 bis 23, mm=Minute 00 
bis 59, ss=Sekunde 00 bis 59). 








TIME$= 

Zum Stellen der Uhr. »TIME$= "151520 « stellt die Uhr 
auf 15 Uhr, 15 Minuten und 20 Sekunden. Die Variable 
TIME läßt sich nicht direkt verändern. Statt dessen wird ent- 
weder »TIME$=« verwendet oder entsprechend in die Spei- 
cherstellen 18 bis 20 gePOKEt. Die Uhr geht nicht ganz 
genau, da die Frequenz, mit der im Atari die Fernsehbilder 
erzeugt werden, nicht genau 50 Hz beträgt. TIME$ wird von 
dieser Frequenz abgeleitet. 

FRAC(exp) 

Diese Funktion ermittelt den Nachkommaanteil einer 
Zahl. »FRAC(exp)« ist nicht immer gleich »exp-INT({exp)«, 
da INT die nächstkleinere Zahl ermittelt. So ergibt »? 
INT(-0.3)« -1, »? FRAC{-0.3)« ergibt -0.3. 

TRUNC(exp) 

Diese Funktion ermittelt den ganzzahligen Anteil einer 
Zahl. Dies ist die zu FRAC komplementäre Funktion. »? 
TRUNC({-0.3)« ergibt 0. 

RND 

RND (irgendwas) kann in Turbo-Basic XL abgekürzt wer- 
den, indem man die Klammern wegläßt. Es wird also RND 
statt RND(O) verwendet (speicherplatzsparend). 

RAND(n) 

Dies ist die Kurzschreibweise für »IRUNC({RND(D) x. n)« 
und erzeugt eine ganze Zufallszahl zwischen einschließ- 
lich O und (ausschließlich) n. 

HEX$(exp) 

Ahnlich STR$. HEX$ wandelt die Integerzahl exp 
(O<=exp<=65535) in einen sedezimalen (hexadezima- 
len) String um. Wenn exp kleiner als 256 ist, ergibt dies 
einen zweistelligen String, sonst einen vierstelligen. 
DEC(sexp) | 
Ahnlich VAL, Umkehrung zu HEX$. Der String sexp wird 
in eine dezimale Integerzahl gewandelt. Wenn sexp mehr 
als vier gültige sedezimale Ziffern enthält, so gelten nur die 
letzten vier. 
$aaaa 

Sedezimalzahl im Programm. Beispiel: 

FOR 1=$0600 TO $067F:READ A:POKE 1,A:NEXT I 
statt: 

FOR 1=1536 TO 1663:READ A:POKE 1,A:NEXT | 

& Binäres AND 

ı Binäres OR 

EXOR Binäres exclusiv OR 

Diese drei Operatoren arbeiten mit 16-Bit-Integern. Also 
mit Zahlen zwischen O und 65535 und nicht mit Boolschen 
Größen (1 oder O0) wie die Operatoren AND, OR und NOT. 
DIV 

Division ohne Rest: aDIVb <=> TRUNC(a/b) 

MOD 

Bestimmung des Divisionsrestes (Modulo): a MOD b 
<=> a-b’TRUNC(a/b) 
0 Hi %2 %3 

Die Zahlen 0 bis 3 sind als Konstanten definiert. Die Ver- 
wendung einer Zahl (auch $aaaa) im Programm kostet 
jedesmal 7 Byte, die Verwendung einer Variablen, unab- 
hängig von der Länge des Namens, jedoch nur 1 oder 2 
Byte. Auch die Verwendung von %0 bis %3 belegt eben- 
falls jeweils 1 Byte, aber keinen Eintrag in der auf 256 Varia- 
blen begrenzten Variablentabelle. 

In Strings oder in zwischen Änführungszeichen stehen- 
dem Text ist es jetzt möglich, »"« (entspricht CHR$(34)) 
durch doppelte Anführungszeichen (” ”) einzufügen. Bei- 
spiel: »?"TEST” "TEXT ”« erzeugt den Ausdruck: »TEST- 
"TEXT«. In Atari-Basic muß man dafür schreiben: »? 
"TEST ";CHR$(34); 

"TEXT ”«. Bei Zuweisungen (A$= TEST” "TEXT”)ist das 
(in Atari-Basic) noch etwas umständlicher. 
Turbo-Basic XL wandelt bei der Eingabe von Programm- 











zeilen automatisch kleine in große und inverse in normale 
Buchstaben um. Dies gilt natürlich nicht zwischen Anfüh- 
rungszeichen (”) sowie nach REM oder DATA-Befehlen. 
Somit lassen sich Programme auch mit Kleinbuchstaben 
eingeben, ohne ständig zwischen Groß- und Kleinbuchsta- 
ben (mitder <CAPS>-Taste) hin- und herzuschalten oder 
ständig <SHIFT > drücken zu müssen. 

In Variablen- und Prozedurnamen istaußer den Buchsta- 
ben und Ziffern auch das Unterstreichungszeichen »_« 
(<SHIFT ->) zugelassen. So sind endlich Namen wie 
MAX_LEN oder PROC SORT_KUNDEN erlaubt. 


Diskettenbefehle 


DIR 
DIR "D1:%.%” . 

Ausgabe des Inhaltsverzeichnisses einer Diskette auf 
dem Bildschirm. »DIR*D1:%.x% ” «listet alle Files von Dis- 
kette 1, »D2:Ax.x « alle Files von Diskette 2, deren Name 
mit A beginnt. »D1:%.% «kann entfallen, dann wird automa- 
tisch »D:%*x.% « eingesetzt (ähnlich wie im DOS-Menü mit 
»A RETURN RETURN«). Bei diesem Befehl sind String- 
variablen wie auch bei den folgenden Befehlen zulässig. 
RENAME ’D:OLD,NEW” 

Benennt das File OLD in NEW um. Entspricht: »XIO 
32, #7,0,0,” D2:OLD, NEW” « oder der DOS-Menü Auswahl 
= 


DELETE ’D:FILE* 

Löscht ein File {entspricht »X1O 33« oder der DOS-Menü 
Auswahl D). 

LOCK "D:FILE” f 

Schützt ein File gegen Überschreiben (entspricht »XIO 
35« oder der DOS-Menü Auswahl F). 

UNLOCK ”D:FILE” 

Hebt den Schreibschutz wieder auf (entspricht »X1O 36« 
oder der DOS-Menü Auswahl G). 

BLOAD ’D:FILE.OBJ” 

Lädt ein binäres File (entspricht der DOS-Menü Auswahl 
L mit »/N« nach dem Filenamen). 

BRUN ”D:FILE.OBJ” 

Lädt ein binäres File und startet es, wenn eine RUN- 
Adresse im File enthalten ist (entspricht der DOS-Menü 
Auswahl L, ohne angehängtes »/N«). 

Damit sind die zusätzlichen Befehle und Funktionen von 
Turbo-Basic XL erklärt. Selbstverständlich stehen darüber 
hinaus noch alle anderen Befehle, die man vom normalen 
Basic her kennt, zur Verfügung. Mit Turbo-Basic XL wird die 
Programmierung auf dem Atari SO0XLAI30XE zur wahren 
Freude. Befehle, die man sich schon lange gewünscht hat, 
stehen jetzt endlich zur Verfügung. 

Autostart 

Mit Turbo-Basic XL istes möglich, nach dem Einschalten 
des Computers ein Basic-Programm automatisch zu laden 
und zu starten. Dazu benennen Sie Ihr Basic-Programm 
einfach in AUTORUN.BAS um. Vergessen Sie nicht: Das 
eigentliche Turbo-Basic muß dann mit dem Namen AUTO- 
RUN.SYS auf Diskette vorliegen. 

(Frank Östrowski/Werner Breuer/hf) 








Band: FF 
OnaB: Ba 
BO1G:3C 
2018: 55 
BIER: 6 
norB: SE 
ans: SE 
0039: I36 
2048:0853 
AR43:CH 
AaSN: 0 
Bo5B: dh 
Da: 
os: Fä 
aa70: SE 
DNB: 55 
Open: 351 
RBaBB: Fi 
OQY7B:FB 
BRFB:EAZ 
aaa: BD 
DBaAB:E> 
BoOBR: iM 
AOEB: 2 
ARCH: 45 
DOCH: 03 
DoDbB: > 
Bad: et 
DaIEd: 7F 
OBEB:O& 
DaF: OB 
BaFa:7F 
g1ad: 42 
2108: 20 
B110:7F 
2B118:33 
BlzR: 72 
Q178:&E 
B13R:08 
B1I3:AB 
91408: 8D 
7R148:B8D 
Bin: E7 
B158: 00 
Ni: BR 
B14B:R0 
3172: 7D 
B1F7B:11 
3180:5B 
0188:55 
A1rd: DC 
0178:04 
A1ad: 73 
Bing: EO 
N1Bd: 354 
BIBB:FE 
BiCEH:D? 
A11C8:09 
AIDA: Ai 
81D8:84 
DIE: DA 
BIER: ER 
DBIFG:CT 
BiırBE: 74 
rad: ZE 
DaB: Bl 
92108: 74 
Br1E:9E 
2770: 80 
0228:15 
B730:E5 


0258: 3A 


27240: 24 
A742: FC 
250: 73 
a?758:D8 
Dr: DE 
9259:DB 
Hr7o: 24 
20278:D8 
0780: DE 
n789:C07 
379702: Ch 
n798:253 
D2RAB:DF 
OZAB: DE 
D7BO:rDE 
B2BGB:DA 
n7C9:DYF 
B27CB: DE 
SZD0: DA 
BPDB: FA 
NrER: DA 


74 


S&<88> 
FFSES> 
Ab 147 
SC{7C> 
ur 287 
364 > 
SIsECH 
ör-b4> 
FB-7C> 
Ds<1&> 
N6:.335> 
Sach 
TCA7F> 
334A53> 
66° 38> 
S1<As> 
Bi1<Al> 
SC<Cc4A> 
Z1<33> 
3cs52> 
20-54 > 
AFLS4> 
655477 
AFSEIF> 
45<677 
47<11> 
San 95> 
/Fi39> 
BSs6öl> 
BAZS1> 
F7B£{05> 
Sem > 
43-D77> 
FR<B1> 
Sr bA> 
&B£02} 
TI ERA> 
A2<-1&> 
BAXCS?> 
FF<BC> 
FE<74> 
2D< Fu > 
Er 3b> 
24<4D> 
LC2S935> 
F4<95> 
FS<DF> 
C5s70> 
FS<FC> 
EC3<C4> 
E3SAS> 
DCX66> 
FS<BZ> 
C4U5B> 
CZXF7? 
24-05> 
C3747> 
nDae{F4> 
F7<FA> 
FIS,497> 
F4LEF> 
E35 7A> 
DE<CF> 
FESFC> 
>3<AD> 
FCX49> 
24. 7C> 
C1<57> 
2543727 
RB 2C> 


IE 


9B8531> 
ZIs.2F> 
SAzE3> 
65<17> 
SF<AD> 
ZF<AFF 
AF<SD4> 
43:37 > 
Sc<5D> 
A2<44> 
70x 76> 
SFSFE> 
DBZAC>H 
43, 78> 
SsE-4F> 
Bu<SE> 
E6468> 
IIx65? 
ZA<sBS> 
FC£A4D> 
Bö<BF> 
ACKBF> 





: B318:358 
320: 37 


0328:32 
213350:32 
A338:752 
0342:32 
N348:32 
A350:32Z 
2353528: D00 
re ai 
n3658:22 
237’W:B1 
03758:2D 
D3B2: 02 
B388:02 
VE92:92 
0578: 02 
I Te 
Band: 
DSEB: 32 
o>BB: Bi 
BSCD9: 01 
0F3C8:03 
B3DRA: 24 
D5D8:B1 
B3SEN:EE 
BSEB: 02 
DSF: BB 
B3F8:01 
4a: ht 


Ama: 


D41R: 20 
014189: 34 
47: AC 
n478: 0A 
0439:4C 
0439:D3 
A440: DD 
91448: 40 
0450:D3 
2458: DE 
4er be 
23458:01 
9470:D3 
A478:4C 
A4BR: Bin 
3488:30 
A490: 4C 
0498: 48 
B4AM: BR 
aaa hs 
D4BRR: E& 
DBAaBe: 02 
A4CO:FS 
B4CB:85 
B400:977 
D408:78 
DA4ED: O8 
D4EBS: AS 
G4Ft:EE 
Darg: 01 
A500: 85 


"BSGB:EB 


2518:971 
a518: FA 
2520:08 
05278: 71 
2550: Dde 
D53B8:&60 
OS42:= AS 
3548:F5 
9530: 97 
4559:9A 
OS55B:E5 
2568: 975 
9578:85 
23570:03 
05850:997 
3583:C8 
2570:71 
05978: 9C 
DSAgm: Di 
BSAg:cE 
BSBd: 18 
B5B8:D4 
BSCO:D4 
B5cH:7F 


32 
Br 


SA 


C5 


GSDA:E7 
BSDEB:EE 
oSEB:DE 
BSEB:DF 
B5SFB:358 
B5SFB:DE 
Dr: 
D&0B: DB 
auh1N: 77 
DBA1E:CA 
D&s20: 05 
479: 4 
Bösg:F?Z 
2430: 772 
0,49: 85 
0448: DA 
50: AT 
465: 
N 1 BR 
264g: Ad 
n570:DE 
n14.70B:77 
nhBN: DA 
480: 72 
DBEFrB: 85 
N&598:85 
AhAm: FO 
Band: 05 
Bö&cl: Dä 
DöAEB: AD 
BACO:D7 
Auch: 77 
06£09:30 
Asdba: 07 
DSERB: 77 
ASEB:EA 
Bari: 77 
B&FB: 85 
B7aR: Dö 
grad: BB 
B71B:1R 
a718:50 
QO7zZa:F4 
B7’ZzB: ER 
A730:7F 
D7Z8:DE 
N7A0:E& 
B74B: EA 
n7S50: 00 
B7358:A5 
N7’ad:EE 
07&8:D7 
DB7’r’B: EA 


w7/79:22 


0750:70 


N788:ES I 


D7’TR: AI 
D79B:E2 
B7Ad:FF 
27AB: CA 
a7BO: BE 
R7BBE: CA 
B7’cH: 27 
n7C8: DO 
B7DO:E13 
27D8:A5 
BER: O1 
M7EB:FF 
D7FO: EA 
AFFB: 22 
Baal: B5 
DeRB:EZ 
nB10: 7% 
BE1B: 009 
ABzB: A 
BBerB:E4 
ag:0:DF 
Daza: EA 
0840: 277 
0548:70 
B352:E7 
Be5g: AI 
BEA: E4 
Ba5B8:FF7 
BBr7n: CA 
B378:05 
BES2: CA 
geBB: 22 
BESr7B: Da 
DB898:13 
waaAn: AS 
Dead: 3 
BSBRd: FF 





QS5<135> 
85<35D> 
BS<CB> 
OA<7A> 
35<57> 
DD<8BB> 
A5<88> 
DA<FO> 
FFLTA> 
TSa<B5> 
D7<59> 
7F<CR> 
EA<BD> 
27<2B> 
SSLBC> 
DI<S4> 
BBXCF > 
1R<CH> 
IBLBE> 
AS<BO> 
DAZ1A> 
FFLIA> 
D2<D1> 
PrLäA> 
FR<S3B} 
EZ<FC> 
SZZER} 
BS<AF > 
DILEF > 
AS<S1> 
DA<{SB> 
CE<DS> 
AN<BE> 
DAZ1CH 
79:02» 


 EZ<FO> 


Prih2> 
95x<9717> 
D5<79> 
BB{P1> 
>8-4F}> 
FO<B4> 
[a a 5 202 
2904 > 
Sa<X7F> 
BICLUF> 
855707 
ARZ1D> 
zu<B7} 
=> 
EIX<BS> 
DIY<ACH 
FZS15> 
ZrscA> 
83s<BF> 
E4445> 
Az«rF1> 
EI<1l> 
FIEbE> 
Cr AR> 
DI-.D5> 
D2<DF> 
2IAFZE> 
Da<SA> 
BC<SF> 
AZXEF> 
EöSSEC> 
FFZ11> 
EZ<E4> 
Zn ZE1> 
BIZ6> 
Ei<EB} 
AB<-BB> 


| 284697 > 


ASSEB> 
ES<FF> 
DI<X35> 
FZ<BC> 
Zr A4> 
BI<24> 
E65750> 
AStCH> 
ES<FE> 
FISEBF 
COX 17> 
DILBF> 
D22377 
22 SCH 
DB<A4> 
ACE47> 
AZSOR> 
E8SsEBU> 
Frz-EO> 








BORB: EA 
Bosch: 22 
BSCB:85 
BED: E4 
BEDB: 24 


BBERB: BO 


DSEB: AS 
BOFB: E& 
gSrFeE:D? 
nern: EA 
ar728:22 
0710:F72 
0719:E7 
ATI: AS 
NFZB: Eh 
man: FF 
Ar30: CA 
19740: DE 
1F74:: 00 
ArIa: AT 
ArSB:E7 
BF740:D7 
BI6SB: EA 
rl: 7 
0978:970 
09782: EA 
ArEB: As 
NFFB: ETF 
DFFB:FT 
DAB: CA 
aFAB: Ba 
AFEBER: CH 
MFEB:1E 
DICH: BD 
AFCE: 65 
nroR:EF 


BFDE:EZ | 


DIEB: 72 
AFEB: BD 
OFF: 57 
BFFO:Fä 
nAnn: BD 
ana: 22 
DAB: ES 
MAalgB: FD 
DAZO: 22 
BAZB:CE 
BAFB:AD 
AnSB: 22 
Aaan: ED 
aAge: an 
Massa: 27 
Add: Da 
Bas: aD 
OAsg: BD 
Mare: #2 
BAFTB:ERA 
AAcd: FD 
nABB: Fr 
BAFd: DE 
Oase: 7D 
AAard:lr 
nAAdBs EZ 
DABD:E4 
AAaBbB:D4 
BACH: DE 
DACH: A? 
AAbe: 7 
BADg: Bi 
DAER: 58 
AAEB: Ai 
DAFO:E7 
BAFG: DS 
BBEBO: Fi 
DEOBS: FB 


BEIN: 97 


PREIGB: FE 
DBR?70:05 
ABr7B: Fi 
NED: Ah 
0B38:597 
Herne 7 
BE43:85 
NEIN: 73 
BESS:F?7 
DEAD: ’E 
NB5G: 75 
BEr7a:F7 
MB7B-B1 
BESB:FT 
ABSB: 43 
DBRFR: BA 
QEF3:78 





E7<BS> 
Pr<OA> 
BSS<FF> 
ES<FS> 
AU<4>> 
2B<C2> 
AS<{14> 
EF<£1E> 
DI<92> 
F2<BE> 
ZA<TE> 
85<78> 
E8S<1B> 
AS<S5> 
ERxBC> 
FI<24A> 
CO<aA> 
ABXBF > 
2B25CH 
AZXSID> 
EB<FF> 
DF<72> 
F7<?7B}> 
ZAXEE> 
SIX<EF> 
EF<AT> 
AS<40> 
E&i98> 
FF<B4> 
CR<13> 
DS<BE> 
FE<FC> 
ES<85> 
Z2<FE> 
BD<AD> 
AS{BF> 
E9<23> 
E1<CC> 
P7<3C> 
BD<FD> 
27£-.2C> 
EI<AA> 
SD<AB> 
22<79> 
D5<48> 
7I<4F> 
L7<CR> 
FSX<EI> 
BSD<9F> 
PI<15> 
DE<1B> 
SD<CC> 
DPI 543 
92<51> 
FZ<EE> 
OD<B7> 
22<C6> 
DE<{BF> 
FD<?8> 
ZZ<FE> 
19<.94> 
SS<DE> 
SKEC>+ 
85<92> 
BI<C?H 
F4<AB> 
DFI< 60 > 
EE<57> 
DS<AF> 
CE<FC> 
SZI<ECH 
AS<T&> 
98<12> 
FS<DD> 
Ir aA> 
46255> 
GA<F7> 
FE<E7> 
CR<71> 


| BFÄFF> 


45%B3> 
695,30} 
GRES> 
45288> 
47sD4> 
972.347 
4sF6> 
B7sB1> 
4a, sn> 
SFLE1> 
D5<89> 
AhzE?> 
n3S<c2> 


BRAU: 85 


ABAB:42 | 
MER: AS 


MBB8B: 29 
BBCH: 27 
QBbCB:D4 
BEDN: DS 
ABDE: DA 
BBEA:D7 
MBEB: DB 


BBFO:DY 


QBFB: TOD 
BCHa: BB 
ACH: AI 
BOlGB: ES 
BC18:85 
NOTE: B4 
ACHB: ES 
BCESB: E35 
2C38:85 
Sag: 55 
oc48: Fi 
BESB: AS 
ACSB: 65 
Scan: 
BC&B: AS 
DC7D: AS 
Ac’o: AS 
AlEi: AT 
DcBB: 70 
ACHO: AS 
OCPB:ES 
OCcAg: 85 
BCAS: BO 
GC: 35 
DSCEB: DI 
DCCH: 98 
0CC8:85 
ScDoE: IE 
DcCDae:AS 
AOCEB: 47 
NCEB: DES 
AcFa:588 
DCFB:85 
BDO: 85 
ADags As 
2D10:85 
AD1S:A5 
2D20:86 
GnDzB: E85 
an30:85 
ADSB: 94 
A040: 05 
ao4a: 18 
er Fl 
ADnSH: 79 
Moan: BE 
BD&AB: 7C 
oD7O:EF 
AnD7B: AD 
EDER: 85 
Roses: E4 
Ana: ES 
BDFB:FC 
BDAD: 88 
ADAB: 85 
BDEBd: Bi 
BDBsS: E09 
ADCa=:E?7 
BDCB: E4 
DDDE: BD 
PODE: Aa 
DDED:ES 
ODE8:D? 
ADFo:E& 
BOorB: Dö 
DEDR: 05 
PENE: ED 
DEIO: 2E 
BE1S:BD 
DEN: 95 
BE>?B:EF 
NESA: DE 
DE>B:0C 
DEAN: 05 
GE4B: BD 
DESO:85 
BESgs EI 
BEA: Mi 
BEASB: 10 
METB: EA 
MEr7O: 085 
BEBB: FR 
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AFASTF 
je ET 
EB:07> 
DA 477 
AnrEb> 
Ara 93> 
A5<54> 
ASs+D5> 
n3:77> 
ASSS32> 
Alc<FEB> 
Binde lo hr 
DEXBS> 
84:07> 
E2<B5> 
ESS 7E?> 
854 I2> 
B5<52> 
EI<ET> 
ERSFF?F 
E1<89> 
18x 9CH 
DSZPB> 
ESSDF> 
Da<{F4> 
16<F9> 
DSZSES> 
Du<ZE> 
BOX 7A> 
DRKXE&ö> 
D7’<F4> 
ErsOA> 
DSC:3R> 
DAX 7B> 
EIiTFZ> 
D7’<B&ö> 
D5S<F4> 
DO<D1> 
4D£979} 
DA<CE> 
ASS 3B> 
BBxS 7/CH 
40-51> 
DI<.5D> 
DS<F7> 
Ba<ı1A> 
05-377 
D7<197> 
ins? > 
DS{PFC> 
DI<-EE> 
BAXS6&> 
zPx 7A? 
EFSEB> 
EF<7C} 
ars1lar 
=z0<D8> 
Ca 5A> 
ER<1B> 
BSS1D> 
ADSA4A> 
85:2C> 
B1X37> 
E47.46> 
FC<877> 
BBE<F?7> 
855973> 
II<EF?> 
BIS > 
D4-57> 
B5<B35> 
BDın> 
na: 76> 
eD<C1> 
ATS? 
EF<F2> 
DS<Zi> 
FF<F@> 
BCS53> 
BS<CB> 
BD<BE?>F 
BIEFF> 
AZSA> 
EN<85? 
Ei1SED> 
n5<31> 
EDS 20> 
EE<AG> 
ErXAd> 
2ZAsSCcE> 
DA<7E> 
48<B1> 
FO<PE> 





HEBB: 4A 
DBEFD:F1 
BEFB:FI1 
BEAN: AF 
AEAB: DS 
DEBA: 9ER 
DBEBd: 65 
DECO: FO 
DBECB: BA 
BED: O0 
GBEDS: AD 
DEEMA: DT 
DEE: 84 
DEFRA=: ZA 
BEFE:ZE 
Drau: 73 
BFae:85 
GAF10:D4 
BF1B:85 
OF2B: 297 


BF2B:32 #9 


BFEZB: 20 
BFZB:2& 
OF4B: 531 
AF4B:20 


orSß: 58 


arSse:E3 
BF&R: 70 
BF&B:49 
BF7R:85 
BF7E:B0 
RFeB: Ab 
AF82:87 
BFFB= Bi 
BFFB:SRB 
BFAD:OZ 
BFAB:D4 
DFEU: 55 
BFBS:EL1 
BFCa: 31 
AFCB: BD 
BFDU: BU 
AOFDE: 40 
DBFEB:B5 
BFEB:AF 
BFFE:FO 
BFFB:DS 
ıi020: Fe 
ı1aAn8- ?F 
181B:9E 
1B18:A9 
1328: 20 
10?72:A5 
10930: 502 
1058: Bi 
1840: 75 
1048: 597 
19509:01 
ıim58- Aa 
1950: 253 
i9058:D4 
13729:D4 
ı1a728:7F 
1952:DF 
193989:01 
1078:BR 
1398:EE 
1aAB: DF 
10AB: 74 
ıiBEB: 85 
123B8: EB 
1BCa:=:TD 
1308: A5 
ı1BDa: 31 
1908: 28 
1BEB: 85 
19E8:C7 
ıiaFa:Fi 
ıiGF8:D4 
1128: BB 
ı1108:23 
illG:EC 
i118:D& 


Listing »Turbo-Basic XL«. 
Bitte unbedingt mit dem Eingabe- 
Programm AMPEL 
von Seite 63 eintippen 





+C{DE} 
DA 175 
BAs4r> 
FESb7> 
ZE<ED> 
F3:55> 
2B:39> 
AI 7a> 
AS<FE> 
BN<1EB> 
DSsEB> 
ASSFS> 
DSX22> 
FBSAC> 
2ur<E&> 
=ZF<BS} 
AF<YF1> 
35<87> 
2c<ERA> 
IB 2F > 
DO<FB> 
ZI<5F> 
=ZCcX71> 
BD{DS> 
CESEB> 
S3Bx 077% 
nFi67> 
nss2D> 
ED<FB}> 
BI<GE?> 
5922087 
E4,44> 
28% 32> 
EFsiAd> 
AATZE> 
DBZEEF> 
6573267 
75.970 > 
44465 > 


| BB<F4}> 


20<87> 
18<IE> 
2FxD2F 
ISsFC> 
DI4EF1> 
SER CB} 
S1<B1> 
Gz<1F> 
A0<BE 7 
Bas TZ> 
291532 
AXE2> 
ASSSS> 
AF<LBF> 
ABZ1D> 
CESSTF> 
26547 
DF<FE> 
Bi<ZB> 
FEXBE> 
AZEFS> 
732145 
20.357 
DAc22> 
4ZanD> 
BIZAFF 
Da 35> 
Fax 367 
BSÄF#> 
85%295 
zZarAäF> 
2067 > 
SDX1D> 
ASFE 3A? 
EF<E8d> 


/3 





1128:85- 


1178:ED 
1130: FE 
1158:77 
1140: GC 
1148: EF 
1158: A3 
1158:E7 
1158: 28 
1158: A5 
i1l7’B: 208 
1178:18 
11809: DE 
1188:EF3 
119709:D& 
1178:57 
11a: Fi 
11A8:55 
11BB:55 
11BB:78 
11C98: 98 
ı11C#:DE 
11lDe: 55 
1108:D7 
11ER: 5& 
11EB: 54 
11F0: DE 
i1F8:0% 
1200: 24 
1288:D7 
1218:25 
1218: 2A 
1778: BA 
1228: FB 
1739:585 
1752:50 
12748: A4 
1248:40 
1750: 45 
1758:685 
12609: A53 
176408: 565 
1770: BD 
177B:D7 
1280: FB 
1788: D4 
1290: 7D 
1276: Bd 
LZAg: D4 
17A8:D?7 
17B9:D4 
17E8: 85 
127C09:D5 
17C8:70 
1200: 75 
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4419: [0 
4418: 4A 
4470: 75 
4428:85 
4470:85 
44308:85 
4449: 37 
49448: E53 
2450:A5 
4458:D0 
4449: CB 
44559: E4 
4470: 0D 
4478:05 
444g: 10 
4498:C0 
44970: FE 
44978:E5 
44AD: BO 
44A9:95 
44B0:E7 
44EB8:18 
4400:02 
4408: E8 
4400: A4 


m 


E7<äB> 
EB<17> 
E7<?1> 
85<4D> 
E1<72> 
ES<21> 
A599 > 
SAL 265 
D7<A2> 
DC<77> 
Do: 42} 
Zar An> 
AS<F1> 
B4<08> 
BS<B1> 
B1<A?2> 
CH<E&> 
?PR<B7?> 
EB<IFS} 
BA<OE> 
AS<E4> 
E&X<EB> 
AS<SB}> 
4C<D35> 
BA<TA> 
SD<D?> 
SA<EF> 
1IS{DE> 
Aa<BS> 
PE<ZF> 
DS<4B> 
Da<BE> 
Da 7F> 
A339 > 
85<D9F > 
762C05> 
DA<CA> 
85<01> 
BC<CB> 
SD<4AD> 
HAAS 
DE<B1> 
DE<{F#> 
SILACH 
9B<L21> 
AC<SA> 
&6{42> 
BE<FR> 
E2<79> 
8D0X{41> 
B4<87> 
CB<53> 
CH£FR> 
BB<FB> 
F99<D7 > 
Da<13> 
AC<F7F > 
FD<71> 
G1<X2T> 
85<D4> 
EBXECH 
90<-75> 
ES3< 77 > 
ED<71> 
ACDE> 


MEINE DHME, MEINE HERREN... 
ES IST ALLES KLAR. WIR 
HABEN WIEDER... 


AERRNTDERIEERERLEE GE: 


44D8: BA 
44EB: 78 
44€E8:720 
AAFü: FF 
44FB: AA 
mals ED 
+09: 70 
1512:4C 
4518:072 
4520: AZ 
4528:22 
4538:B1 
4550: A2 
454: Az 
4548:20 
4550: 50 
nd: AU 
45658: C5 
4558:80 
4570:DE 
45 7/BıAr 
4590: 70 
4588:A5 
4570:C5 
4378:C5 
45ABE1d 
45A8:DE 
45BbA: DR 
45B8:E1 
4500: A 
45C8:C8 
4+5b9: 50 
4509:C8 
45E0: 40 
45EcE8:85 
45F0:05 
5F8:05 
4500: 00 
4508: AD 
4519:9C 
4618:8D 
46479:C7 
hr: Ad 
4550: AD 
25.28: 8C 
46549: C2 
4645: BA 
a a 
4.359: 20 
hs: 20 
4468: 04 
47/0: 68 
4578: 0A 
4490:B1 
244,989: 04 
292: 11 
4478:05 
Yard: ah 
4ans: 85 
45B0: 18 


ES 


4C 


Im | 


Laenge 181404 Bytes 


FF<F1> 
Bb<T6> 
BB<57> 
Ar<OZ> 
Ab<29> 
DE<6A> 
FF<EE> 
AB<AD> 
91S09> 
23<B&> 
B1<46> 
BI<SF> 
Bi<A9> 
FD<F1> 
ER<26> 
FE<DF> 
ED<FF> 
AB<C7> 
ZU<ES> 
@7<F2> 
FF{74> 
3EI<SC> 
A2<AE> 
AS<SC> 
A2<40> 
AS<IB> 
E&<B6> 
EI<DA> 
SRXCF> 
ES<89> 
ED<CE> 
BR<ER> 
BE<FB> 
CH<ES> 
Ca<D4> 
CB<OD> 
AF<DA> 
DF<D&> 
20<38> 
S8XEE> 
BA<{29> 
76<58> 
B2<CD> 
FF<B&> 
96<65> 
BI<XED> 
Fb<ac> 
FF<DC> 
FEXAF> 


 AB<D7> 


SurZF> 
Bi<1F> 
102 54> 
CBi427 
ADSBE> 
8b714> 
B1<227 
BA{ZD> 
BaxEU> 
Eb<B5> 


Listing »Turbo-Basic-XL« (Schluß) 


REEL Sr 











Erst durch einen Assembler kommt man mit dem 
Atari so richtig auf seine Kosten. Wir stellen 
einen Assembler vor, der zum ersten Rein- 
schnuppern wie geschaffen ist. 


es sich nicht umgehen, ihn in Maschinensprache 

zu programmieren. Der Atari-Computer macht hier 
keine Ausnahme, denn solche Leckerbissen wie Display- 
List-Interrupts oder Player-Missile-Grafik lassen sich kaum 
in Basic schreiben. Da es recht schwer ist, in Maschinen- 
sprache zu programmieren, benötigt man für das Vorhaben 
ein Programm, das die unverständlichen Zahlencodes des 
Mikroprozessors in eine lesbare Form bringt: einen Ässem- 
bler. 

Unser Assembler ist in Turbo-Basic geschrieben. Er eig- 
net sich hervorragend, um kleine Maschinenprogramme 
zu erzeugen. Zum Beispiel lassen sich damit die in dieser 
Ausgabe angesprochenen Programmierbeispiele sehr gut 
ausprobieren. Da es sich um einen Zeilenassembler han- 
delt, ist er für größere Programme weniger geeignet. »Zei- 
lenassembler« bedeutet, daB eine eingegebene Zeile 
sofort in den Maschinencode des 6502-Prozessors über- 
setzt wird. Zum Austesten kleiner Programme ist das ideal, 
da man sich so nicht mit allen möglichen Bedienungsbe- 
fehlen anderer Assembler herumschlagen muß. 


Der Assembler 
besteht aus drei Teilen 


Der »ASS-Assembler« besteht aus drei Teilprogrammen. 
Tippen Sie alle drei unter Turbo-Basic und mit Hilfe des 
Prüfsummen-Programms ab. Das erste Programm mit dem 
Namen »DATEI.SET« ist lediglich dazu da, eine Hilfsdatei 
auf der Diskette zu erzeugen. Wenn Sie das Programm lau- 
fen lassen, wird auf der Diskette das File»DLI.DAf« erzeugt, 
das vom Assembler benötigt wird. 

Das zweite File mit dem Namen »AUTORUN.BAS« wird 
von Turbo-Basic automatisch geladen und gestartet. Bei 
dem Programm handelt es sich um ein Vorprogramm, das 
verschiedene Speicherstellen im Computer setzt und 
anschließend das eigentliche Assembler-Programm lädt. 
Am besten verwenden Sie für das Programm eine eigene 
Diskette. Darauf kopieren Sie dann ein DOS, das Turbo- 
Basic, das »AUTORUN.BAS«-File, das »DLI.DAT«-File, das 
von dem »DATEI.SET«-Programm erzeugt wurde, und den 
Assembler. Wenn Sie das Turbo-Basic in »AUTORUN.SYS« 
umbenennen, lädt der Computer beim Einschalten den 


U m einen Computer voll ausnutzen zu können, läßt 








| Assembler Syntax und 
STA $02C8 Ä - 
LDA $DO1F N = 
LDA #$A5 - Immediate 
CMP #307 LDX 35600 - Absolut 
LOA $0200.X _ Apsciutx 
ER R: u 
Si ie LDA $0200Y - Absolut,Y 
LDA $10,X - Zeropage,X 
LDA #SFF LDAS$S10Y  - ZeropageY 
STA $O2FC JMP $0600 - Jump direct 
PLA JMP ($0600) — Jump indirect 
RTS ROR A — ACCU 
BNE $5600 - Branch 


Das Programm wird mit der 
<START >-Faste beendet 


Tabelle 1 (oben), 
Tabelle 2 (rechts) 





ASS —- klein, aber fein 


| MOV $1000,100 - Verschiebt einen beliebigen Block (in diesem Bei- 









Fer ven-nussembler 
£c3 1955 arTwäre 
& Peer Johannsen 


Kieine Programme sind mit »ASS« kein Problem 


Assembler automatisch. Unter Happy-DOS müssen Sie 
den Befehl »JOB TURBO.COM« benutzen, damit Turbo- 
Basic und damit auch der Assembler automatisch geladen 
und gestartet werden. 

Wenn der ASS-Assembler geladen ist, sehen Sie einen 
viergeteilten Bildschirm. Der oberste braune Teil enthält 
lediglich den Programmnamen. Darunter befindet sich 
eine blaue Zeile, in der die einzelnen Befehle eingegeben 
werden. In der folgenden, grau dargestellten Zeile stehen 
eventuell auftretende Fehlermeldungen des Ässemblers. 
Im unteren grünen Teil wird schließlich ein eingegebenes 
Programm gelistet. Zusätzlich dient es als Sichtfeld für den 
eingebauten Monitor. 

Der Assembler kennt sämtliche 6502-Befehle. Zur Ver- 
deutlichung zeigt Tabelle 1 die Schreibweisen aller Adres- 


Assemblerbefehle | 


PON - Alle Befehle werden zusätzlich auf dem Drucker 
ausgegeben 

POF - Drucker wird ausgeschaltet 

ORG $5800 - Programmzeiger setzen 

COD 00101101 - Bitmuster in die Speicherstelle des momentanen 
Programmzeigers schreiben 





























DAT $FF$12, - Hexadezimalzahlen in die Speicherstellen des 
| $41,$52B momentanen Programmzeigers schreiben 
| ASC Dies ist .- ASCII in die Speicherstellen des momentanen 
ein Text Programmzeigers schreiben 
| CHA $0600 - Zeigt die entsprechende Dezimalzahl 
| CHA 1536 - Zeigt die entsprechende Hexadezimalzahl 


spiel von $1000 ab 100 Byte zur Stelle hin, auf 
die der Programmzeiger zeigt) 


MON — Aufruf des Monitors 

DIR .— Zeigt Directory von Laufwerk 1 

DOS - Geht ins DOS 

END \ - Beendet das Programm und geht zurück ins 
Basic 

NEW - Startet den Assembler neu und beginnt wieder 
bei Adresse $5600 

FIL2 - Schreibt in Speicherstellen hinter dem 
Programmzeiger zweimal den Wert des 
Programmzählers 

PUT D: —- Speichert einen Speicherinhalt und zwar 100 

PRG.DAT,100 Byte vom Beginn des Programmzeigers ab unter 
dem Namen PRG.DAT auf Diskette 

GET DB: - Lädt den Programmblock PRG:DAT von Diskette. 

PRG.DAT Anfangs- und Endadresse werden dem Block ent- 


nommen 


83 





sierungsarten des Mikroprozessors. Ein Dollar-Zeichen vor 
einer Zahl gibt dabei an, daß es sich um eine Hexadezimal- 
zahl handelt. Bei den Adressierungsarten »Immediate«, 
»Absolut«, bei den direkten Sprungbefehlen sowie bei den 
»Branch«-Anweisungen läßt der Assembler anstelle von 
Hexadezimalzahlen auch dezimale Zahlen zu. 
Kommentare lassen sich ebenfalls in ein Programm ein- 
fügen. Dies geschieht, indem man einem Text ein Semiko- 
lorı voranstellt. Sinnvoll ist dies allerdings nur, wenn man 
mit dem Befehl »PON« einen angeschlossenen Drucker 
aktiviert. Dann werden alle eingegebenen Befehle und 
"Kommentare gleichzeitig auf dem Drucker ausgegeben. 


Ab $5600 ist alles frei 


Neben diesem Befehl hat der ASS-Assembler noch: wei- 
tere Befehle eingebaut. In Tabelle 2 sind sämtliche Kom- 
mandos zusammengestellt. 

Wenn Sie mit dem Assembler programmieren wollen, 
sollten Sie zwei Dinge beachten. Zum einen dürfen Sie 
nicht die Seite 6 im Computerspeicher verwenden, also 
den Speicherbereich zwischen $600 und $6FF. Hier liegen 
einige Maschinensprache-Routinen des Assemblers. 
Wenn Sie dort etwas hineinschreiben, hängt sich das Pro- 
gramm unweigerlich auf. Sie sollten auch darauf verzich- 
ten, den Programmzähler niedriger als Speicherstelle 
$5600 zu setzen, da in diesem Bereich der Assembler 
steht. Zum anderen kehrt ein von Ihnen geschriebenes Pro- 
gramm nur dann wieder zum Assembler zurück, wenn es 
mit dem Maschinensprache-Befehl »RTS« beendet wurde. 
Nebenbei sollten Sie immer mal wieder Ihr Programm mit 
dem Befehl »PUT« auf Diskette speichern. Es gibt schließ- 
lich nichts Unangenehmeres, als durch eine kleine Störung 
im Stromnetz ein schweißgeborenes Programm zu verlie- 
ren. 

Zum Ausprobieren des Assemblers haben wir ein kleines 
Programm abgedruckt. Was das Programm macht, wird 
nicht verraten. Viel Spaß beim Assemblern! 

(Peer Johannsen/hf) 


Steckbrief 





A REM ##*_Datei .Setı#%*#+ <S5B> 
1 DATA-76,43,6,72,138,72,1686,285,142,18, 
212,189,97,6,141,24,298,169,15,253 <XR> 
2 DATA97,6,41,15,141,25,288,232,175,11, 
212,281,1908,298,2,162,8,134,295,104 <PD> 
5 DATA-1790,124,64,173,48, 2,133, 205,173 ,4 
9,2,133,204,160,6,169,1390,145,283 <P@> 
4 DATA.209,192,28,205,247,150,2,169,240, 
145,203,1589,3,169,174,145, 205,169 LCH 
5 DATA-S,141,8,2,169,65,141,1,2,1659,192,1 
41,14,212,157,90,133,205,194,95,1& <PH> 
& DATA»16,16,16,16,16,128,128,128,4,4,4, 
174,1974,174,174,1974,1974,173,194,1974 <AM> 
7 DATA194,194,1974 <F0> 
8 OPEN #%1,8,%8,"D:DLI.DAT" <Pr> 
9? FOR I=#1 TOD 121:READ X:2=I+X:PUT #%41,X 
NEXT I:CLOSE #%1 <GG> 
ia IF Z<>14355 THEN ? "DATA-ERROR.! TE 
ND <DA> 
11 ? "OKS-JALLES.KLAR" <UN?> 


Listing. »DATEI.SET« erzeugt das File »DLI1.DAT« 
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5 REM #*#* ASSJ-.Zeilenassembler „#%** 

iB GRAPHIES B:POKE 752,1:POKE 710,128:P0 
KE 712,128: POSITION 2,7 

15 7? ".{CTL BIZCTL RITCETL RIECTL EItCTL 
BILCTL RILCTL RYECETL E>tCTL BI{CTL RYTCT 

L RY{iCTL E}sau...Zeilen-Assembler" 

28 ? ".{SHIFT =3KCTL BIEETL EItSHIFT =3t 
SHIFT =}3{CTL B>{CTL R3tETL CH{SHIFT =}+{C 
TL B3IETL RItCTL C>" 

25 ? "{SHIFT =3{CTL ZIICTL EItSHIFT =3{ 

SHIFT =}3£CTL ZY{CTL RYtCcTL EI{SHIFT =Ht{C 
TL ZY£CTL RIECTL EIL{CTL DB>iCcTL RYiCTL R 
+{CTL E32 1C)21988.Artware" 

38 ? ".{SHIFT =Y{iCTL QO3{CTL EItSHIFT =3{ 

ETL Z3£CETL R3ZETL E3tSHIFT =3ECTL ZItCTL 
RIAICTL EItTSHIFT =}s{CTL ZHtCTL RI£CTLR 
>iCTL 23" 

35 7 "„{SHIFT =3{SHIFT =3iSHIFT =>3{SHIFT 
=J7iETL BHICTL RYSCTL ECHiSHIFT ={CTL O3 
£{CETL R3SCTL CHt{SHIFT =}22.,..,5 Peer „.Joha 
nnsen" 

48 7 ".{CTL ZIEETL EHiCTL ZIECTL CHECTL 
ZHXCTL RYtETL RIICTL CHiCTL ZYtECETL RHiCT 
L RYLETL C4" 

45 OPEN #1,4,8,"D=:DLI.DAT":BGET #1,1536, 
121:CLOSE #1:RUN "D:ASS.PRG" 





Listing. »AUTORUN.BAS« erzeugt ein Ladebild 
und startet den Assembler 


DB REM ##*#, ASS. „Zeilenassembler „##* 

5 DIM 6$ (22) „AFCA2) „BE (#2) „CH (%X2) „DE (%2) 
„HFLIS) „P#(%X2) „R$ (5) 

1. — 

15 # START:GRAPHICES ZB: POKE 752,#41:X=USR 
11556): 27=22016 

28 7 "s{CTL DIICTL RILCTL RYECTL EITETL 
BIECTL R3TCTL R3SCTL EItCTL QIACTL RYECT 
L RIXETL EisnaasıZeilen-Ässembler" 
25 7? "{SHIFT =3£CTL BIECTL EI{SHIFT =3% 
SHIFT =3{CTL B>XCTL R3ECTL CHiSHIFT =HiC 
TL Q>{CTL R3ZETL C3" 


| 30 7 "{SHIFT =FECTL ZIÄICTL CHiSHIFT =37 


SHIFT =F£CETL Z+{ETL R3iETL EFtSHIFT =Fic 

TL ZYH{ICTL RF{CTL EIsLCTL B>SCTL RHicTL R 
><CTL Er (CC). 1995. Artware" 

35 7? "-{SHIFT =3{ETL BrHSCTL EItSHIFT =3{ 

ETL ZI{ICTL RItCTL EFTSHIFT =IHTETL ZIECTL 
RFICTL E+TSHIFT =F3,.CTL ZIXIETL R3EECETLR 
STCETL EC” 

48 ? "„{SHIFT =+{iSHIFT =}{SHIFT =3XISHIFT 
=}{CTL GIECTL RItCcTL CH{SHIFT =IXCTL 83 
<ETL R3{CTL CHiSHIFT 322.2... %,Feer „Joha 
nnsen" 

45: PU TLICH ZIIEEL EFICETE- ZIEETL CHIETL 
Z+TETL R3E£CTL RIICTL EHtCTL Z>3tCETL RrtcT 

L R>SCTL C3" 

sa —— 


| 55 # MAIN: POSITION 490,727 "F"sHEXFIZI:EX 


EC IMPUT: POSI TION 7,18:7 EEE GERNE 
858 IF G#tHi,Hi THE 
N 560# PRINT 

85 H=sof(%1,AF) :As=",„.": BteAs: CHeät 

7a — 

75 IF H$="FON" THEN PR=%1:FPOSITION 7,18: 
? "Drucker.an":50# MAIN 

sa IF H£="PürF" THEN FR=#8:POSITION 7,18: 
?” "Druckerzaus":60# MAIN 

85 IF HE="DORG" THEN GO# ORG 

Fa IF H#="COD" THEN GO# COD 

95 IF H$="DAT" THEN GOs# DAT 

180 IF H#="CHA" THEN GO# CHA 

185 IF Hr="ASC" THEN GO# ASC 

11@ IF H+="MOV" THEN GO# MOV 

115 IF H£="RuNn" THEN GO# RUN 

128 IF HrF="MON" THEN GO# MON 


u # 
= he A eh he he 


<rö?r 


<BK> 


uF> 


<HA> 


<aN?> 











125 IF H$="FIL" THEN 60# FIL 

158 IF H£="GET" THEN GO# GET 

135 IF HF="PUT" THEN 60# PUT 

148 IF H£="NEW" THEN 60# START 

145 IF H£="DIR" THEN GO# DIR 

158 IF H$="D0OS" THEN DOS 

155 IF H$="END" THEN TRAPF #1:GRAFHICS #8 
:END 

1808 —- 


1685 TRAP 570: A$=G$ (5,5) :BF=68 (6,6): C3=G$ 
(8,8) :D$=6G$ (11,11) 


179 IF A$="." DR Af="A" THEN Ps="IP":C=H 
1%) 
175 IF At="#" AND B£="f" THEN PF="IM":C= 
2 


lea IF Af="#" AND BE>="B" 

EN P#="1IM":C=7 
185 IF At="(" 
Ps="IY":C=#2 
198 IF At}="B" 
C=5 

195 IF As="(" AND B$="+" AnD G$(18,108)=" 
£" THEN P£="1IX":C=%2 

zug IF At="z" AnD G#f(1dQ8,1B)="_" THEN P#= 
"AB":C=#i 

=05 IF At="#" 

Fi‘ 

zig IF At="t" AND C$=",„" 
THEN Pf="IX":C=%5 

215 IF As="s" AND C$="," 


AND Bt<="9" TH 
AND B#="#" AND D#="Y" THEN 


AND Arz="9" THEN P&="AB": 


AND C#="." THEN P$="ZP":C= 
AND GF(97,1="X" 


AND GF(97,7)="Y" 


THEN P$="Z7Y":C=%3 

220 IF As="#" AND Df="X" THEN Fe="AX":ce 
#1 

225 IF At="2" AND Ds="Y" THEN PF="AY":C- 
“1 

2308 IF Af="(" AND Df=")" AND G$(19,1BD)<} 
"X" THEN P&$="IN":C=5 


235 IF H$(A1,A1)="B" AND H&<>"BIT" AND H 
EL >"BRE" THEN P$="R":C=4 

240 —— 

245 RESTORE :H#(4)=P&:I=-Z1:REFPEÄT 


250 READ R#:I=Ir%1: IF I=256 THEN 5708 
255 UNTIL R$=H$: AF=HEXF (I) BF" _":C#=BH 
2a — 


POKE Z,I:IF C=%8 THEN X=2: Z=7+721:60# 
PRINT 

278 ON CE G0# AB,IM,ZP,RR,IN,DE,ZE 

275 G0# MAIN 

280 — 

285 # RUN=IF G$(5,5)<>"$" THEN 578 

ZF2 X=USR(DEC(GE(5,9))):G0# MAIN 

295 —- 

300 # ASC:X=Z:FOR I=22 TO %1 STEP 
G$(I,II<>"L" THEN FOP :G0TO 318 

385 NEXT I 

318 FOR C=5 TO I:rPOKE Z,ASC(6G$(0,C)):7=7 


—1:IF 


+#1:NEXT C:60# PRINT 
Er Fr 
Ss2B # COD:X=42:FOR I=5 TO 12:IF G$(1,ITD= 


THEN X=X+%42*(7-(1-5)) 

325 NEXT I:POKE Z,X:X=2:7=7+41:60# PRINT 
330 — 

355 # DAT:C=ZB: FOR I=5 TOD 17 STEP 4: IF 6 
$(I,I)="$" THEN POKE Z+C ,DEC(G$ (I+%1,1r% 


zrı:Ccec+Zil 

344 NEXT I:X=Z: 7=-7+C:60# PRINT 

345 -- 

sS5Q0 # MOV: IF G#(19,1B)<>"," OR G8(5,5)<> 
"2" THEN 5780 


399 IF G£(11,11)="f" THEN G#Ft11)=STR# (DE 
CiG#(12))) 

I=DEC (G$ (5,7) 3): X=WVAL (GE (11)) 

IF I>=Z THEN MOVE 1,7,X 

IF I<Z THEN -MOVE 1,Z,X 

x=2:60# PRINT 

3585 # AB:DPOKE Z+r%1,DEC(G# (6,77): BE=HEXF 
(PEEKIZ+A1)ECFSHEXE (PEEK (Z+K2H ) ıX=7Zı Z=Z 
+#3:60# PRINT 


“HR> 





320 — 

395 # IM:X=DEC(68(7,8)):POKE Z+%41,X:B$=H 
EX# (X): X=7Z: Z7=I+42:6G0# PRINT 

490 -—- 

405 # ZP:X=DEC(GF(A,7)):POKE Z+%1,X:B$=H 

EX#F(X):X=I: Z=7+42:60# PRINT 

410 -- 

215 # RR=:X=DEC(IGF(A., MN}: X=Z—X 

420 IF ABSCX)>128 THEN FOSITION 7,18:7 " 

DOffset.>.128":GET %:60# MAIN 

425 IF X<Z2 THEN X=ABS(X)-42:6G0T0 435 
4508 X=255-(X+%1) 

4535 FOKE Z+%1,X:BF=-HEXE (X)ıX=Z: ZI=Z+%2 
448 —— 

445 # FRINT:POSITION %#8,13:? "{ESC SHIFT 
DEL}": POSITION %0,22: IF Gr(#1,41)=":3" T 
HEN * G#:6G0TD 455 

450 7 "ETSHEXEIKI Sau Ts AST" Ns BEr "a c$e 
nt - G+ 

455 IF FR=%48 THEN 50# MAIN 
450 TRAP 575: IF GF(41,%1)=";," 
T 63:60# MAIN 

455 LPRINT "E"sHEXE (X), "1." A; " "BE; ". 
C$ "2.",168:60# MAIN 

470 —— 

475 # IN:DPFOKE Z+#1 ,„DEC(G#(7,18}}):BF=HEX 
Z(PEEKIZ+A1)) 2 C$H-HEXS$ (PEEK (7+%42) ):X=2: Z= 
Z+413:60# PRINT 

480 
485 DATA-BRKIP,DRAIX, ,,„DRAZP ,ASLZP,,PHP 
Ir 

4939 DATA-ORAIM,ASLIP, , „ORAAB,ASLAB, „BPL« 
R,ORAIY,,, 

495 DATA-ORAZX,ASLZX, „ELEIF,ORAAY, „,,ODRA 
AX „ASLAX, „JSRAB,ANDIX,,,BITZP,ANDZF 

Sad DATALROLZP,,„PLPIF,ANDIM,ROLIF,,„BITAB 
„‚ANDAB,ROLAB,,„BMI-R,ANDIY,,, 

535 DATA-ANDZX „ROLZX, „SECIP,ANDAY,,„,;, RAND 
AX,ROLAX,,„RTIIP,EORIX,,,„EORZP,LSRZP, 

sin DATA-FHAIF,„EORIM,„LSRIP,,„JMPAB,EORAB, 
LSRAB, ,BVCAR,EORIY, ,,„„EORZX,LSRZX, 

515 DATA-CLIIP,EORAY, ,,„EORAX,LSRAX,,RTS 
IP,ADCEIX,,„,,„ADEZP,„ROR?ZP,„FLAIP,ADCIM 

528 DATA-RORIP, ,JMPIN,ADCAB,RORAB, ,BVSLR 
„ADEIY,,,„ADEZX,RORZX, ,„SEIIP,ADCAY 

525 DATA., ,„ADCAX,RORAX,,„„STAIX,,,STYZP, 

STAZF,„STXZP,,DEYIP,,TXAIP,,„STYAB,STAAB 

530 DATASTXAB, „BECAR,STAIY, ,,„STYZX,STAZ 
X,STXZY,,„TAYIP,STAAY,TXSIP,,,.STAAX,, 

355 DATA-LDYIM,LDAIX„LDXIM,,„LDYZP,LDAZP, 

LDXZF,„,TAYIP,„LDAIM,TAXIP,„LDYAB,LDAAB 

548 DATALDXAB, „BES-R,LDAIY,,,LOYZX,LDAZ 
X,LDXZY,,„ELVIP,LDAAY,TSXIP,,LDYAX 

545 DATALDAAX,„LDXAY, „CPYIM,CMPIX,,„,ECPYZ 
P,CMPZP „DECZP,„INYIP,CMPIM,DEXIP,,CPYAB 

550 DATACMPAB,DECAB, „BNE-R,CMPIY,,,,ECMP 
ZX,DECZX,,„CLDIP,CMPAY,,,,„CMPAX,DECAX, 

555 DATALCPXIM,SBCIX,,,„ECPXZP „SBCZP , INCZP 
„„INXIP,SBCEIM,NOPIP, ,„CPXAB,SBCAB,INCAB 

558 DATA. ,BEBAR,SBCEIY,,,„„SBCZX,INCZX, „SE 
DIP,SBCAY,,„,,„5SBCAX,INCAX,,, 

aa 

s78 POSITION 7,18:?7? "Syntaxs—Error":GET 
X:60# MAIN 

575 POSITION 7,18:? "Kein.Drucker.!'!!",P 

R=2B:GET X:60# MAIN 

80 —— 

s85 # MON:C=Z:POSITION %#2,13:?7 "<ESC SHI 
FT DEL}{TESEC SHIFT DEL}" 

SssB FOR X=Z8 TO 7:POSITION #2,22:7 "F":H 
EXF(C+X#8)5;"_."s:FOR I=%8 TO 7 

575 ? HEXS(PEEKIC+X#8+I1)), "."2:NEXT I:? 
:POSITION %9,13:? "XESE SHIFT DEL3"=NEXT 
X 


THEN LPRIN 


—— 


Listing. »ASS.PRG« ist der eigentliche Assembler 
(wird auf der nächsten Seite fortgesetzt) 








<AR> 


80 


508 POSITION %Q,13:7 "XESC SHIFT DEL}": 

OSITION AB, wet "Weiter mit SPACE« ,azuru 

eckmit RETURN" 

6085 DO :GET X:IF X<>32 AND X<>155 THEN L 

ODP 

618 POP :FOSITION #8,13:7 "XESC SHIFT DE 

L}{ESC SHIFT DELH":IF X=32 THEN CeC+64:6 

DTO 598 

615 GO# MAIN 

a2za — 

625 # DE:DPOKE Z+#1 „VAL (GFLISI IT BS=HEXF (P 

EEK (Z+Z1)) 2 C$=HEX# (PEEK (Z+#2) 3) X=Z: Z=eI+ü 

35:60# PRINT 

5639 — 

635 # ZE:POKE Z+%41,„VAL (G$ (6)) : B$=HEXS$ (PE 

EK(Z+%41)):X=Z2: Z=7+422:60# PRINT 

548 — 

645 # CHA:IF 6$(5,57<>"f" THEN GF(%#2)=HE 
KEIVAL(G$CSI II: SS (71, Al)="Z":G0T0 855 

658 G$=STR$ (DEC (G$ (6) ) 

655 POSITION 7,18:? "entspricht .";6Ff:60 

# MAIN 

sh —— 

&65 PROC ZNEUFSPOSTTIEN FFET Pass n 

ae ST PÜKE 732,48: POSITION ö, Pi 

7 "1-40: G$="" 

678 TRAF 5&7B:GET X: IF (X>2& AND x<32) OR 
x=127 THEN 578 

675 IF X=125 AND I=%8 THEN 578 

8 IF X=125 AND I=4 THEN IF G£(A1,AL)<> 
"3" THEN 6851(4,5)=".":1=1-72:? "£ESC DEL 
+{ESC DEL}Y"5:GOTD 578 

&85 IF X=126 THEN 6$(1,1II=" 
{ESC DEL}"3:60TD 578 

6978 IF X=155 THEN 715 

695 I=I+r41:G$(1,D)=SCHR# (X)? CHRECKY, 


„":1=1-%41:7 " 





Vier nützliche kleine Programme stellen wir 
Ihnen hier vor, mit denen Sie Files auf Diskette 
untersuchen, Disketten schnell formatieren und 
Ihr DOS an mehrere Laufwerke anpassen. Das 
vierte ist als Zusatz für unseren »CHAR-MAKER« 
gedacht, mit dem Sie dort erzeugte Zeichensätze 
laden. 


in Diskettenlaufwerk ist eine feine Sache. Gerade, 
F= wenn man vorher eine ganze Weile mit dem Kasset- 

tenlaufwerk der Atari XL/XE-Computer gearbeitet 
hat, wird man von der Geschwindigkeit, mit der Daten gela- 
den und gespeichert werden, berauscht sein. Nebenbei 
bietet die Diskettenstation noch einige andere Vorzüge. So 
braucht man sich überhaupt nicht um die Plazierung der 
Daten auf der Diskette zu kümmern. Zuverlässig sucht die 
Diskettenstation freien Speicherplatz auf der Diskette und 
findet genauso zuverlässig gespeicherte Daten oder Pro- 
gramme wieder. 

Bald hat man sich an das Laufwerk so gewöhnt, daß man 
sich gar nicht vorstellen kann, je ohne dieses ausgekom- 
men zu sein. So passen sich bald auch die geschriebenen 
Programme dem Betrieb mit der Diskettenstation an. Vier 
solcher Programme, die im Laufe der Zeit einfach dadurch 
entstanden sind, daß eine Diskettenstation im Computer- 
system zur Verfügung stand, wollen wir hier vorstellen. Alle 
Programme sind als Hexadezimal-Listings im AMPEL-For- 
mat abgedruckt und sollten mit diesem Eingabeprogramm 


86 





Disketten-QuarteHt 





ea IF I=43 AND 6#(%1 
"s3l=4:ı6$(1,I)=". 
785 IF I=22 THEN 715 
18 G0T0 578 

715 IF LEN(GFI<>HZZ THEN GF(LEN(G$I+%A1,22 


„Al)%>"3" THEN 7". 


EEE EEE 
728 FOKE 752,41:ENDFROC 
ia — 

7358 # FIL:MOVE Z,Z+%71,.VAL (GEF (TI er X=Z: ZZ 
WAL GES (SI I+H1:60# PRINT 

7353 —— 

748 #% GET:TRAP 745:DPEN #71,4,28,58 (5) :% 
GET #%1,X,IrBGET #%1,X,1:%GET #%1,Z:CL0S 
E ##1:G0# MAIN 

745 CLOSE #X1:POSITION 7,18:? "I/Os—.Err 
or":GET X:60# MAIN 

Sa — 

755 # PUT=X=INSTR(G$,", 
78 

7&8 TRAF 745: I=VAL(GSIX+A1)):DPEN #%1,9, 
78B,6+(5,X-Z1):#4PUT #41,„Z2,I:BPUT #%41,2Z,[I: 
PUT #%1,Z:CLOSE #%21:60# MAIN 

73 — : 
778 # DIR:POSITION #8,13:? "{ESC SHIFT D 
EL}":TRAF 788:0PEN #%21,6,48,"D:#.%" 

775 POSITION #28,13:7 "{ESC SHIFT DEL>+"=:I 
NPUT #41,6#:POSITION #98,22:7 G$:PÄUSE 10 
:60T0 775 

80 CLOSE #%1:POSITION %8,13:?7 "{ESC SHI 
FT DEL}":POKE 754,255:60# MAIN 

IB — 

78 # ORG:IF G#fi1B,1B)<>"." THEN 578 

795 I=DEC(G$(6,9)):60# MAIN 


")=IF X=#8 THEN 5 


Listing. »ASS.PRG« (Schluß) 








abgetippt und unter dem im Listingkopf angegebenen 
Namen auf Diskette gespeichert werden. 


ADBR zeigt den Speicherplatz 


Das erste Programm ist dazu ausgelegt, die Speicher- 
platzbelegung eines Programms anzuzeigen. Im Gegen- 
satz zu anderen Computern wird beim Atari ein 
Maschinensprache-Programm in mehrere kleine Pro- 
gramme aufgespaltet. Teile, die bei verschiedenen Pro- 
grammen häufiger gebraucht werden, lassen sich so auf 
einfache Weise zu einem Programm dazukopieren. 

Speichert man unter DOS 2.0 oder DOS 2:5 ein File mit 
der Funktion <K>, »Save File«, beziehungsweise unter 
OSS CP/A 1.2, 2.1, DOS XL oder Happy-DOS, mit »SAVE 
Filename Startadresse Endadresse« so wird am Anfang 
des Files die Start- und Endadresse des Files gespeichert. 
Das File sieht dann folgendermaßen aus: Die ersten beiden 
Byte haben den Wert 255 ($FF). Dadurch erkennt das DOS, 
daß es sich hier um ein File handelt, das mit dem »SAVE«- 
Kommando vom DOS aus gespeichert wurde und das sich 
mit dem »LOAD«-Befehl wieder laden läßt. Versucht man, 
ein File vom DÖS aus zu laden, das diese Kennung nicht 
besitzt, beispielsweise ein Basic-Programm, so meldet das 
DOS nur »Bad Load File«. Ist die Kennung aber vorhanden, 
so weiß das DOS, daß die nächsten beiden Byte die Start- 
adresse und die darauffolgenden Byte die Endadresse des 
Files darstellen. Die Bytes, die dann folgen, bestehen aus 





den Daten des Files. Entweder ist das File dann zu Ende, 
oder es folgen wieder Start- und Endadresse, gefolgt von 
Datenbytes. 

Diese Folge von Ladeadressen läßt sich mit dem ersten 
Programm »ADDR« auflisten. Sehr nützlich ist diese Funk- 
tion bei der Fehlersuche in eigenen Programmen, oder ein- 
fach nur, um in fremden Programmen herumzuschnüffeln. 
Wenden Sie das Programm doch einmal spaßeshalber auf 
den Turbo-Basic-Interpreter an. Sie werden staunen, aus 
wie vielen Teilen der Interpreter besteht. 

Dabei werden Sie aber gleich noch etwas Bemerkens- 
wertes feststellen. Beim Untersuchen von Turbo-Basic wer- 
den Sie zweimal auf die Zeile: »INIT AT ...« stoßen. Was hat 
das zu bedeuten? 

Nun, in dem File lassen sich nicht nur die Start- und 
Endadresse eines Files festlegen. Gleichzeitig ist darin 
auch die Startadresse des Files gespeichert, wobei es sich 
dann um ein vom Mikroprozessor des Computers direkt 
ausführbares Maschinenprogramm handeln muß. Bei allen 
DOS-2-kompatiblen Operationssystemen, wie DOS 25, 
OSS CP/A 1.2, 2.1, DOS XL und Happy-DOS, gibt es zwei 
Arten von Startadressen. Die eine Adresse wird in den 
Bytes 738 und 739 gespeichert ($2E2 und $2E3) und bildet 
die Adresse, an der das File nach dem kompletten Laden 
gestartet wird. Die Startadresse des Programms legt man 
fest, indem man im File einfach eine Ladeadresse in diesen 
Speicherbereich angibt, gefolgt von zwei Byte, die die 
Startadresse des Programms enthalten. 

Ein Programm soll zum Beispiel an der Adresse 8192 
($2000) gestartet werden. Also folgen im File vier Byte mit 
der Ladeadresse in die Speicherstellen 738 und 739: 226, 
2, 227, 2 ($E2, $2, $E3, $2), in der Reihenfolge Low-Byte, 
High-Byte. Anschließend folgen zwei Byte, die in diesen 
Speicherbereich geschrieben werden und gleichzeitig die 
Startadresse des File bilden: 0, 32 ($0, $20). Wenn das File 
fertig geladen ist, springt das DOS automatisch zu dieser 
Adresse, und das Programm wird gestartet. Fehlt diese 
Ladeanweisung im File, werden die Daten des Files nur 
geladen. 

DOS 2.0 und DOS 2.5 unterscheiden sich hier von den 
anderen DOS-Versionen. Unter CP/A 1.2, 21, DOS XE und 
Happy-DOS wird die Startadresse eines Files gleichge- 
setzt mit der ersten Ladeadresse des Files, solange keine 
andere Ladeadresse wie oben geschildert angegeben 
wird. Alle Files, bei denen unter diesen DOS-Versionen ein- 
fach nur der Name eingegeben wird und deren Extension 
»COM« lautet, werden automatisch gestartet (CP/M und 
MS-DOS lassen grüßen). Um den automatischen Start zu 
verhindern, gibtes bei diesen DOS-Versionen den »LOAD«- 
Befehl, über den einfach nur ein File in den Computerspei- 
cher geladen, aber nicht gestartet wird. 

Neben dieser normalen Startadresse gibt es noch eine 
weitere, die die normale Ladeprozedur des DOS beim 
»Binary Load«-Befehl unterbricht und kurzzeitig ein Pro- 
gramm ausführt, bevor das File weiter geladen wird. Diese 
Adresse wird in den Speicherstellen 736 und 737 zwischen- 
gespeichert ($2EO und $2E2). Wird eine Adresse wie oben 
angegeben vom File in diese Speicherstellen geladen, so 
springt das DOS anschließend zu dieser Adresse und 
unterbricht damit kurzzeitig den Ladeprozeß. Erst wenn der 
Mikroprozessor in dem Programm auf den Befehl »RTS«, 
»Return from Subroutine«, stößt, wird der Ladeprozeß des 
Files vom DOS fortgeführt. 

Bestes Beispiel für die Anwendung von Init-Adressen ist 
das Turbo-Basic. Dieses lädt in den Speicherbereich ab 
$5E00 die Grafik für das Happy-Computer-Zeichen und 
springt dann über eine Init-Adresse kurz zu einem Pro- 
gramm an Speicherstelle $2100, das das Ladebild erzeugt. 
Erst dann wird der Turbo-Basic-Interpreter fertig geladen. 








23:58 er er: ee 


Mit dem Programm ADDR lassen sich nun die Lade-, 
Start- und Init-Adressen von Files auf einfache Weise anzei- 
gen. Nebenbei bemerkt, war das Programm eine große 
Hilfe, um das Turbo-Basic an den Kassettenrecorder- 
Betrieb anzupassen. 


Falls Sie mehr 
als ein Laufwerk besitzen 


Das zweite Programm ist dazu geschrieben worden, Ihr 
DOS mitmehreren Laufwerken zusammen arbeiten zu las- 
sen. Um Daten vom und zum Laufwerk zu schicken, muß 
das DOS die Daten erst in einem Speicherbereich zwi- 
schenlagern. Immer wenn genug Daten zusammengekom- 
men sind, werden diese auf die Diskette geschrieben oder 
von dieser heruntergeholt. Damit die Daten bei verschiede- 
nen Laufwerken nicht durcheinanderkommen, hat jedes 
Laufwerk seinen eigenen vom DOS verwalteten Zwischen- 
speicher. Das gleiche gilt auch für die geöffneten Files. 
Jedem File wird Speicherplatz zugewiesen. Da an den 
Atari-Computer bis zu acht Laufwerke angeschlossen wer- 
den können, und da maximal acht Files gleichzeitig geöff- 
net werden können, würde immer ein riesengroßer Spei- 
cherplatz für die Laufwerke reserviert und vom übrigen 
Speicher getrennt werden. Da so mancher Atari-Besitzer 
froh ist, überhaupt ein Laufwerk zu besitzen, wäre dieser 
Speicherplatz in fast allen Fällen verschwendet. Aus die- 
sem Grund läßt sich dem DOS die Anzahl der Laufwerke 
sowie die der maximal gleichzeitig geöffneten Files mit- 
teilen. 

Normalerweise geschieht dies vom Basic aus, mit 
umständlichen »POKE«-Befehlen. Viel zu schnell geht da 
mal ein POKE daneben und verdirbt dadurch das DOS. 
\Wenn dies nicht bemerkt wird, ist beim nächsten Schreib- 
oder Lesebefehl eine Diskette hinüber. 

Diese ganzen Nachteile umgeht der »DOS-Customizer«. 
Über eine Menüsteuerung lassen sich bequem die zur Ver- 
fügung stehenden Laufwerke sowie die maximal geöffne- 
ten Files einstellen. Hat man die Einstellungen vorgenom- 
men, sollte man als nächstes diese angepaßte DOS- 
Version auf die Diskette schreiben. Dadurch übernimmt 
das DOS die Einstellungen beim nächsten Laden. Falls 
dann einmal ein zweites Laufwerk dazugekauft werden 
soll, läßt sich das DOS mit dem Customizer ohne Probleme 
wieder anpassen. 

Der DOS-Customizer funktioniert nur mit dem DOS 2.0, 
DOS 2.5 und CP 1.2, 2.1 sowie DOS XL. Er sollte auf kei- 
nen Fall mit DOS 3 oder Happy-DOS verwendet werden. 


Ein Dutzend Disketten formatiert 


Haben Sie schon einmal mehrere Disketten hintereinan- 
der formatieren müssen, zum Beispiel nach einer schon 
lange fälligen Aufräumaktion in Ihrer Software-Sammlung? 
Womöglich hatten Sie sich ein neues Paket mit Disketten 
gekauft und wollten diese gleich mit formatieren. Wenn Sie 
dann vom DOS zum x-ten Mal nach dem Laufwerk, auf dem 
formatiert werden soll, gefragt wurden, und ob Sie sich 
auch ganz sicher sind, die Diskette ohne jeden Vorbehalt 
undohne Rücksicht auf Verluste formatieren zu wollen, und 
ob Sie nicht vielleicht doch eine falsche Diskette eingelegt 
haben, und ..., und ..., und ..., und ..., wenn Ihnen dann 


schon einmal der Kragen geplatzt ist und Sie die DOS- 
Diskette wutschnaubend in die Ecke gefeuert haben, ja 
dann kommt unser Programm »Formater« für Sie genau 
richtig. 


8/ 





Mit diesem Programm läßt sich mit nur einem Knopf- 
druck eine Diskette formatieren und auch gleich ein DOS 
schreiben. Falls sich auf der Diskette kein DOS befindet, 
meldet diese anstelle eines nervös piepsenden »BOOT 
ERROR« einfach »Kein Dos auf dieser Diskette«. Wenn das 
nicht komfortabel ist? 





Directory in Kyrillisch 


Das letzte Programm kann man mehr als eine nette Spie- 
lerei betrachten. Das Programm kopiert bei den XUXE- 
Computern einen beliebigen von der Diskette ladbaren Zei- 
chensatz, zum Beispiel einen des in diesem Heft vorgestell- 


Frogrammname :ADDR. COM 29128:4C 


DBaRd:FF 
Oa0S: 54 
B019:8D 
D918:AF 
B0r8:42 
Da28:F3 
20328:83 
2039: 8D 
Bas: 
20485:05 
2950:03 
2058:8D 
aan: Fr 
Ba58: AD 
0378: 84 
n378:42 
B2080:23 
ABB: 05 
8090: 08 
BB9B:FF 
BaAG: SD 
BA: AF 
BRBD: 497 
BOBB: HU 
BacH: ZE 
Bac8: 22 
PaDB:3D 
AaDEr Ar 
DIE: 42 
BGEB:?71 
DaF: Ah 
BaAFB:5D 
B1lBd: A? 
g105:03 
B110:28 
0118:29 


Frogr ammname 


na49:721 
2050:A7 
gea58: AD 
DaB: 32 
D0&8: 354 
ga7B=:17 
233728:721 
ne: Ar 
anas: AD 
BAFR: 4A 
2B98:50 


: DOSCUST. COM 
512 Bytes 


B128:A7 
2130:48 
8138: BB 
Bi4d:E4 
B14B:C0 
21548:03 
23158: 80 
B1öB: A? 
2158:55 
0170:84 
83178:2D 
2180:21 
B1898:21 
Bir: ED 
B1978:A7 
B1lAd: 42 
B1AB: 62 
B1BQ:80 
B1BS: 4A 
B1C9:053 
B1Cs: BD 


B1Da:A2 E 


B108:8& 
BIEB: AS 
BlEB:AS 
BiF9B:C5 


BiF8:37 


2289:80 
2708:08 
B210:297 
B210:72 
2220:83 
BZ2B8: AD 
82308:8A 
02389: 03 
B248:9D 
02749: 90 
B25B:A7 
0753:28 


DBaAB:S?7 
DBOAB: BF 
Baba: AF 
BOBB:BE 
DOCH: 8D 
BECE:8D 
Baba: 21 
DaADB: BD 
BOED:AF 
DOES: 22 
BAFB:33 
Dare: BD 


B109:A7 8 


01983:053 
alld: AD 


B1lild:F5 


Air: E4 
D128:A9 
O134:FA 
8138:4F 
D140:4F 
2148:53 
0150:47 
01598:53 


ten »CHAR-MAKER«, und verwendet diesen fortan zur Dar- 
stellung auf dem Bildschirm. Bis zum nächsten Druck auf 
die <RESET >-Taste haben Sie zum Beispiel Ihr Directory 
in kyrillischer Schrift oder Ihr Basic-Programm in Gotisch. 
So lassen sich auch ganz einfach die deutschen Umlaute 
sowie das »ß«, in eigene Programme einbinden, das im 
zweiten internationalen Zeichensatz des Ataris XL/XE nicht 
enthalten ist. 

An dieser Stelle wollen wir Sie auffordern, uns ähnlich 
kurze, sinnvolle oder auch weniger sinnvolle, dafür aber 
nette Programme zu schicken. Diese vier Programme sol- 
len als Anregung dienen. Gleichzeitig wünschen wir Ihnen 
mit unserem Programmaquartett viel Spaß. 

(Andreas Sons/hf) 


2260: 24 
22568: 7B 
B77B:4C 
2278: 2E 
2720:04 
2288: 68D 
0298: A? 
D798:497 
g2Ad: BE 
BZAB: AS 
B2BQ:44 
D2BB: 20 
D2CH: 35 
D>7CB: 58 
B7Da: 70 
D7D8: 28 
DREB:4E 
BPEB:ST 
B2FO:42 
DPF: 41 
23509: #7BE 
2308:45 
2310: 4F 
9318: 3F 
2320: 41 
2328: 49 
2338:54 
0338:>31 
0340: 20 
8348:9B 
0350: 3A 
3558:354 
030: 3A 
B558: 78 
05370: 28 


Listing 1. »ADDR« zeigt 
die Speicherbelegung 


2B159:70 7 zZD 
2169:47 33 
8178:52 4E 
23178:597 4 52 
23188:53 35 
0188: 7R 4D 
air: 70 45 
gBiF8:4F 45 
B1AB: 4% = 
21A98:553 45 
BiBB:45 4X | 22 
21B8:44 55 
B1lCcH: 45 A Fa) 
B1C8:55 47 
21D8:53 II 25 
2B1D8:42 45: 
DB1EB: 31 20 
B1EB:S&A 597 
B1Fa:52 zu 
BIFB:2F u 20 


Listing 2. »DOSCUST« paßt 
das DOS an 








Frogrammname :FORMAT.COM 


Länge 


:744 Bytes 


Da50: FD 
0058:898 
2050: A7 
2958: 45 
Bar: Du 
a9a73:1R 
BRBBd: FD 
DaB: Et 
2070: 03 
ara: 9D 


Bar 


Band: 45 
DBBA:FB 
20B8:08 
BaCca: 43 
BRCS: 4D 
gabe: 1& 
BaDB: SD 
BOEB: 21 
OBEB:17 
DEFO:AF 
DOFS: 28 
BilBa: Fi 
2108: 28 
0119:?7D 
a118: 21 
B128:7D 
2129:A?F 
3130: 18 
B138:83 


Frogr ammname 


BB10:BE 
2918:D1 
2920:20 
2929:%7D 
DO30: 49 
n19383:00 
29408:C0 
BO4B:C4 
2958: 50 
Ba58:E& 
Bas: Eh 


Sc 


BIAANSFENGEO 


: XLCHAR. COM 


2140: FD 
91483:A7 
2150: Ad 
29159: 720 
N1&0: FD 
Bi148: 78 
B170:42 
n179:723 
g1l2E0:03 
9188: AFP 
a17d: 44 
BlF?8:FF 
B1AB: HS 
31A8:33 
B1BU:03 
BiB8: 7D 
alla: AP? 
31C8:58 
01DB: A? 
81D8:45 
BIEB: 21 
B1EB:33 
BIFB:E4 
BiIFEB:ED 
2208: 97 
2798:953 
B218:E4 
B718:A2 
n7279:2B 
0228:83 
22730: r7D 
22738: 22 
0240:53 
#745: I3E 
D250:4F 
2258:7B 
D74B: 70 
B258:31 
Bz7’B:41 
0778:53 
0280:55 
Ars: Do 
290: 72 
027978:20 


Ba55:FB 


BOF7B:FB | 


2a78:01 
BaBSB:84 
Aus: 74 
0270:85 
2B978:BB 
Baal: 
BaAg: FD 
DOBd: 7 
DaB: AF 
29:45 
Bacgs: 00 
BADO: 47 
D2aD3: 05 
BRER:BS 
DIES: FD 


RE ME 


s0!D 

y HABEN MICH 
SCHON WIEDER 
ABGESTÖPSELT 








<DE> 
<EE> 
<9b> 
<EB> 
“Fr? 
<AD> 
<bE> 
<B4> 
<öB> 
xB2> 
865> 
<aha> 
<El> 
<89> 
“277 
«F2> 
<ED> 
<BB> 
<1B> 
<1&> 
{Fl1> 
<#P1> 
<S4> 
8D> 
saF> 
<BB> 
<Dö> 
-B4> 
sED> 
x21> 
30> 
<FC> 
-Dös> 
<59> 
<AB> 
«D5> 
67? 


: sEB> 


<B7> 
<B6> 
<7E> 
“<2Db> 
<50> 
<aA> 


DPAB: 57 
B2AS: 74 
B2BR: 70 
82B8:4C 
Br7Ca: sFr 
B2C8: 54 
B7DB: 44 
A7DB: 309 
DPREB: 28 
BREB: 65 
DFB: 20 
BZFB: 20 
9300: 597 
Aut: TE 
013108:47 
2318:&D 
320: 61 
29528:87 
1330: 77 
2339: 44 
034B:72 
2548:79 
0350:57 
2358: 44 
2350: 6l 
>48: 55 


B370:854 


2378: öF 
BIBR: 47 
0588: 64 
3970: 72 
0398:4F 
DFAgB: 44 
93A8:57 


Listing 3. Mit »FORMAT« sind 
Disketten ruck zuck formatiert 
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Asteroiden-Achion 


Was kann spannender sein als ein Spiel zu zweit? 
»Paver« verspricht nicht nur Spielspaß, sondern 
auch tolle Musik und butterweiches Scrolling auf 
einem geteilten Bildschirm. 


twa im Jahr 2700 entdeckte die Menschheit, daß 
kleine, wendige Gleiter und die Schwerelosigkeit 
ganz neue Spiele erlauben. 2978 kam ein begeister- 
ter Spieler auf eine völlig neue Idee: Zwei Spieler fernsteu- 
ern aus dem Orbit zwei Gleiter. Auf der Oberfläche eines 


on 
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Spannung auf geteiltem Bildschirm 


Asteroiden wird ein Spielfeld markiert, das aus lauter sym- 
metrischen Teilen besteht. Dann wird ein Großteil des Fel- 
des wieder mit Staub abgedeckt, nur am oberen und 
unteren Rand bleibt ein schmaler Streifen frei. Der Compu- 
ter gibt im Laufe des Spiels einen Teil des Musters an, und 
die Spieler müssen zu der Stelle fliegen, an die dieses 
Muster gehört. Hat man sie erreicht, befreit der Computer 
sie automatisch vom Staub, der Spieler bekommt Punkte, 
abhängig von der Anzahl der Nachbarplatten, und die Jagd 
auf das nächste Teil beginnt. 


Frogrammname :PAVER,. COM BAD: Ag 


Damit das Spiel nicht an Spannung verliert, kann man 
sich auch gegenseitig abschießen. Das bringt zwar keine 
Punkte, dafür dem Mitspieler einen Zeitnachteil. Er beginnt 
nämlich wieder am linken Ende des Spielfelds, was beson- 
ders am Ende des Spiels, wenn nur noch wenige Stellen 
übrig sind, sehr ärgerlich ist. Sie müssen sich also auf 
mehrere Dinge gleichzeitig konzentrieren. 

'Wenn Sie das Listing »Paver« mit AMPEL abgetippt 
haben, können Sie es über das DOS starten. Zum Spielen 
brauchen Sie unbedingt einen menschlichen Mitspieler 
und zwei Joysticks. Der Spieler mit dem Joystick ın Port 2 
steuert den rosa Gleiter auf dem unteren Bildschirmaus- 
schnitt. Bei Paver spielen Sie nämlich auf einem geteilten 
Bildschirm, wie man ihn zum Beispiel von »Ballblazer« her 
kennt. Die Schirme können völlig unterschiedliche Aus- 
schnitte des großen Spielfelds zeigen. So sehen Sie nicht 
nur, was Ihr eigener Gleiter macht, sondern haben auch 
Ihren Gegner im Auge. Wenn Sie am hinteren Ende des 
Spielfelds angekommen sind, können Sie entweder umdre- 
hen oder geradeaus weiterfliegen. Nach einer Weile kom- 
men Sie dann wieder zum Anfang des Felds. 

Solang noch die Titelmusik läuft, haben Sie die Wahl zwi- 
schen zwei Spielmodi: »GAP« und »NON-GAP«. Bei GAP 
ist das Spiel zu Ende, sobald einer der Spieler 1000 Punkte 
erreicht hat. Wenn Sie NON-GAP wählen, müssen Sie alle 
Felder wieder vom Staub befreien. Gewonnen hat dann der 
Spieler mit der höheren Punktzahl. Durch Drücken der 
< SELECT > -Taste können Sie vor jedem Spiel den Modus 
bestimmen. Um das Spiel zu beginnen, drücken Sie ein- . 
fach die <START > -Tlaste. 

(Frank Wittenmayer/gn/hf) 


(Eingabenite: | AmpEL_— | 










Bı <AD> 21C0:980 & 


Boaaa:FF 
aaa: De 
2019:D3 
2818:BC 
2020:0D 
aaa: Ar 
29330: A5 
DazB: Da 
B040:74 
D948:F& 
2359:02 
B258:8D 
2060: 47 
2958: 17 
2970: 20 
2078: 24 
Ba: 
DBaSB: BE 


Burda: 2A 2 


098978:5B7 
BaAB: 3 
BaAB: BC 
BRABER: 1E 
OB: 14 
BACH: 58 
20C9:FF7 


BRADBS:85 
DBEB: 31 
BREB:85 
OBFO: A4 
BOFB:B5 
21298:3D 
2108:58 
B11G:88 
93118:18 
2128: 8A 
9128:94 
B130:00 
9138:D2 
2140:10 
B148:FB 
09150: BA 
9158: 56 
B150:C8 
3158:Bi 
2170:Cä 
B178:18 
B1BB:CA 
3188:CA 
a1r2:?7D 
B178:4C 
B1Ad: 24 
31AB:24 
B1B9: 74 


B1BB:24 | 


13 <&4> 
s1 <CA> 
BS <37> 
BZ x7R> 


. D2 <B8> 


Fa <BC> 
82 <88> 
CA.,<37> 
48 <F7> 
BO <58> 
AF <BD> 
BF <EE> 
EA <Ab> 
4C <5F> 
35 <87> 
BF <4B> 
85 <83> 
CB <SF> 
Bi <c2> 
Bil <69> 
CB <535> 
93 £<13> 
5A <B> 
D2 <99> 
Bi £AC> 
Ci <67> 
FE <13> 
9C <Ca> 


BICB:F3 
BiDG:FE 
B1D8:A4 
BIEB:A3 
B1ES:35 
B1IFB:95 
BIFB: BG 
23228:84 
8208:81 
2210:04 


23218:02 


0228: 82 
2228:85 
2230:07 


B738:B1 | 


0240: 00 
3248:B8 
B2Sg: Bd 
3758: 89 
32752: BD 
2248: 08 
2270: ?7D 
2278: 25 
2289:C07 
B288:FD 
329708:2C 
92978: 402 
BZAB: 25 


NSNTEZESNSISLEERFLIRER 


S$EuD 


55% 





BZBB:FG | 


32B8:ı&8 
227C8: 84 
B2C8:38 
327D@:Bi 
BZDB:25 
BZEB: IC 
BREB:ATF 
B2FB: 25 
BZFBıBC 
B3B2: BE 
B508:ı25 
3318: ?D 
B318:9D 
2328: 2C 
B328:658 
1 Tr, rat a} 
93381253 
0340: 25 
3548: AP 
0358: 25 
3358:B1l 
25698: BA 
BB: Bl 
2378: ?D 
237B:25 
2335852: 08 
9388: 82 
23578: 9D 
B378:B08 
DIA: 35 
B5A8:07 
03B2: DE 
BS5BB: DA 
B3C8: 12 
85C08:12 
2308: 12 
BSD08B: 12 
BSEB: 10 
B3EB: 17 
03F0:197 
B3SFB: 17 
2400:17 
2408: 1B 
2410:04 
B418:28 
0420:0D 
A: 
0450:01 
2438: 08 
2440: 
9448:27 
2450: 27 
0458: 27 
0450:28 
0458: 728 
3470: 78 
0478:297 
3480: 29 
A428: 10 
2498:18 
04978:08 
In Ten Fr 
DaB: 28 
2B4B0: 70 
3468: 18 
234C2: 08 
B4C08:88 
B4D0: 24 
B4DB: 7A 
D4ER: ZA 
D4EB: A 
A4Fa: 8 
B4F3:88 
2589: 3C 
B508:88 
B51B:4C 
0518:09 
8528:51 
DBS528ı FF 
2530: A 
0538: 79 
05408: 56 
B548: FF 
2558:18 
B558: 18 
DSB: Ah 
2558: CC 
n1570:88 
B578:FF 
BS5ed: Ba 
20588: Bä 
B590:10 
BS98:B8 
DSAB:1B 
BSAB: 61 





DM 
= 1 


GSBSAEH-AFFrOBHBA 





BSEB:&1 
BSEB: SF 
BSF8:55 
B5SF8:0898 
BB: 
D408: 08 
9519:C3 
B&1B:3F 
0528:37 
n&28:FF 
0430:10 
04:38:18 
04409: [05 
0548: 01 
B450: 08 
B558:08 
Basp: BB 
04458: 
B57B: BA 
0578:78 
04808: 88 
05886: 2D 
0780:B7 
QB&9FB8:8D 
| 
BaAd: 82 
D5BR:8D 
B&BB: AP 
BECH: Ch 
05C8:48 
B&bB: 2C 
294D8: 00 
BEER: A 
O4EB: BO 
BAFO: 0 
B4FB8:ıB00 
2708: 20 
2728: 80 
27128:B8 
8718:B88 
ara: 0a 
n728:20 
0738:09 
2738:B8 
0740:30 
2748: 008 
B7’sd: On 
0758:08 
07&0: 88 
2768:009 
2770:20 
20778:B28 
2769:08 
2788: 80 
27970: B8 
0778: 808 
Dr’Aad: Be 
B7AB: BB 
07B8:08 
D7BEBS:BR 
07C9: 08 
B7C8: 08 
B7DE: 00 
27D8: Ba 
D7EO:BO 
B7EB: A 
B7FO:DO 
D7FB: 808 
B900:20 
0598:B008 
2910:00 
B818:B0 
BB279: 08 
2828: B0 
28308: 00 
28538: 28 
Da4d: ma 
083489: 30 
B850:08 
Be58: Da 
8450: 20 
9858: 08 
B870:B0 
B878:009 
B8808: 80 
9588:08 
3378: 00 
D878: BO 
BeADB: Da 
BaeAB: BU 


[ 
kn 1 


3BSBEBG SBEBSEASHSSSEHHEBEBSBGE 
BE 5 SBSEBSBEBBBSBASSHBBEBSBEH 


garen 8 52555525535 IH: S585555:5 
68 555555535 558 5 2 5 SB5565B55 BB 


SF 


BE 
- 


5355E saBBE 
BANG BSBB&E 


83222322332383832358 
595898 50958 895 
| 





BF18:2B8 
7220: 
39728:B8 
297358: 09 
B738rFB 
27490: 08 
99748:55 
3758:87 
2958:48 
ars2: 56 
0758:153 
2772:00 
2778:155 
29788:18 
2988:10 
29798:DE 
BFFB: BR 
Brad: AO 
BrAa: HA 
O97BR: FA 
BFBS:DF 
BFCcB: ie 
B9C8: 41 
B7D09:&597 
B9D8:55 
DIEB: AO 
BIES: BF 
BFFB: 09 
BFFB: CA 
DA: AD 
OA: AS 
BALB:EB 
BA18:8A 
BA2B: Bi 
A728: 977 
n350: 84 
DASS: BO 
BAD: AA 
0A48:05 
BAS5a:TFE 
2A53:B4 
BAsB: 2C 
DAB: BS 
BA7O:BS 
0A78:85 
aha: 85 
DASS: AF 
BAF0:85 
BAFS:0O 
BAAB: FE 
BAAB: 20 
BABB:ZE 
BABB: AS 
BACH: SB 
BACH: TO 
DADE: 60 
BADB:1i 
BAER: 7 
BAEB:BS 
OhFB: Da 
BAFS: AD 
DBBRB: 2 
BB08:F8 
3RB12:ı7D 
BB18:B389 
BB2B: 21 
BB2S: FD 
BB: da 
DE353:897 
DB42:28 
0B48: 47 
BB50:02 
BBSS: AD 
BRLR: O2 
BBöB: BB 
BE7’B:2D 
BB7EB:NO 
DP39:81 


BBBEB:B1 | 


BEFB: BD 
GEY78:00 


»Paver« für zwei Spieler 


SNESSSSSSESRSKEBEBSS 


(Fortsetzung) 





Ba 


DESSBRSNSAMMERKUHFIBHUSLUNABALBEBERHNSUUSN 


au 
lt] 
a0 
As 


D4 
| 8B 


MBSBESESSSHENSUNSUBNIBETRBUN 


12 


85 


97 


SDSARENEDD 


La) 
be 


M"*SOITNTBSBSSDBEST-H-ÜTTDNN DS 
DISECNBEUHEMRMASDIN 


su 


SE888H8 5 n5H0G0 








BBEDS:AF 
BBEB:D4 
BBEBS:7FB 
OBFO:85 
BBFB:BB 
BcHa: EF 
BCBB: BF 
BC1B:E2 
BCIB:ES 
DB: Ar 
BC28:7D 
050: 82 
5038: 00 
2C49:B7 
BC48:68 
BcHH:ZF 
8C58:88 
BC&aB: 80 
BC58: 08 
BC78: Ba 
NCc78: 08 
BCE: 0 
BCBB: 08 
2BC9UB: 00 
DC9B: DO 
BCAD:E? 
BCAB: DE 
BCBR: 30 
BCBB:DS 
ACC0O:D8 
SCCB: 95 
BCD8S: 48 
ACDB: O5 
DCEU:&8 
ACEB: AFP 
BacFO: AB 
SCFB: 8A 
ADaf: Ag 
BDaB: AA 
2AD19:95 
2D18:58 
BD2a8: 32 
2D28:7F 
BD3B: CA 
BDSB:rE& 
DDAB: AB 
BD48:?7E 
ADS: CF 
BD5B: BE 
BDAd: ZE 
BD&sB: AD 
09070:85 
BD7B:A& 
ODEB: AS 
SD88: E4 
DDP: ES 
30978: 78 
BDAB: ZE 
BDAB:AD 
BDBR: AD 
BDESBı 409 
DDCB: 85 
BDCH: AA 
AnDa: FE 
BDD8:C9 
BDEB: BE 
BDES:?2E 
SDFO: AD 
BDFB: 85 
DEU: A? 


BEBB:BB 


DE1B: 38 
BE1B:ES 
BE7B:04 
BE2B:?7E 
BE3U: ?E 
DESB: AD 
DE4B: A? 
DBE48168 
BESUO: 07 
DES8:B7 
DE&L&I: BR 
DEösB:BF 
BE’: FF 
DBE7B: 31 
DEBUG: 31 
BESB: 31 
BEFB:S1 
BEFB: 31 


32 


27 


BRSNRBASHHBSNSSBENZENABSH 


ES 


AC 


A7 


2E 


BEAB:BC 


BEEB: BC 
BEES: >28 
BEFB: FO 
DBEFE: 208 
urda: 20 
DFaS: 74 
DF10:98 
BF18:78 
GF2ZB: 48 
BF28:B4 
BF>30: 48 
BFSS:EE 
OF40: AS 
BF48:03 
DBFSO: 75 
9F58:B81 
GOF&s0:35 
BF58B: AFP 
BF7O: AB 
OF7S8:48 
BFBO:E7 
BFBS: ED 
OFF780:32 
BFFB:AA 
BFAB:1EB 
BFAB: 4A 
BFBB: AS 
OFBBS:ı AS 
BFCB: AP 
BFCBES2 
BFDB:FO 
BFDB: 85 
BFEB: AS 
BFEB:68 
BFFE:ED 
BFFB:ED 
1992: 20 
1828:BB 
1910:8F 
1818:D& 
1028:D7 
1828: ?0 
1038: 33 
1838: 753 
1048: AD 
1949: 4C 
1850: D4 
1258: DS 
1040: 72 
1948:5353 
1078: 73 
1078:AD 
1280: 4C 
1288:0%3 
1299: 29 
1998: BB 
12A0: 00 
1DBAB: 08 
13B0:45 
18B8:C7 
18CG0:BF 
18C8: 33 
1800: 54 
1208: DB 
1BER: A 
IBESBS: E& 
18F0: Da 
iaFB: 4A 
1108: E& 
1188:Dd 
1118: 0A 
1118: AD 
11208:85 
1178:85 
i130: 88 
1158:85 
11408:59 
1148:8C 
1158:&57 
1158: AD 
1159: 27 
11868: DF 
117B:EE 
1178:C64 
1189: DF 
1168: EE 
11979:C4 
11P8:DF 


BERSSMSTRAAHNRDESAUN 


0) 
© 


74 


c4 


85 


11AR:EE 
11A8:C4 
11BBß: AD 
11B8: AS 
11CB:EB 
11C8:88 
1108:85 
11D8:DE 
11E8:DD 
11E8: 59 
11F8:AF 
1iFB:EC 
1290: DA 
1208: 18 
1218: DO 
1218:497 
12729: AD 
1228: 84 
1238: DD 
1238:BC 
1248: 808 
1248:&9 
1258: A? 
1259:57 
12408:87 
12598:18 
1278: 1A 
1778:188 
1782: BD 
1288: 70 
12798: CA 
1298:089 
17AB: BO 
12AB:28 
12B9: 08 
17B8:87 
12C8: BF 
12C8: 22 
12D8:E5 
1208: 83 
12EB: A2 
ı1?E8: 253 
12F0:48 
12F8:B8 
13930: 548 
1308: A7 
13108: AF7 
1318: AP 
13280:85 
13528:48 
13379:07 
1339: 48 
1340: A2 
1348: 23 
1350:8D 
13538: 02 
1350:BO 
1358: 009 
1370:20 
1378:68D 
1380:FF 
1388: B2 
1398: FB 
1398:38 
13AD: 35 
13AB:B9 
13B8: 35 
13EB8:8D 
13C8:32 
13C8:CC 
1308: 20 
13D8: 28 
ı3E0: 79 
13E8: 36 
13F8: BD 
13F8: AD 
14908: B1 
1498: 54 
i418: 35 
1418:87 
1428: 729 
1428: 356 
14308: AS 
143B: 722 
1448: DO 
1448:CC 
1458: CD 
1458: 29 
1440: 5% 
1458: 71 
1470: 29 
1478: 35 
14908: 28 
1498: 34 
1490: 31 
1498:37 





BD2 


27 


KIBRBESBERIS-UNSBARBASHHSAB 


[2 
ir 


53 
[14] 
BASHEBRHTREHSKEABTATERSR SHE 


BaSAsKOmMSunS% 


AC 


Sayanas 


1 
pe 


AS 


<C8> 
<Cc9?> 
<BE>} 
<48> 
<68> 
<76> 
<a7> 
<30> 
“F2> 
<AaB> 
<A9> 
<44> 
<1E> 
<AC> 
<CF} 
<59> 
<15> 
<28> 
<D9> 
< 7C> 
<97> 
<39> 
«31> 
<3D> 
<a5> 
<EC> 
<73> 
<AE> 
<Sc> 
<CcB> 
<F4> 
xBA> 
<41> 
<2C> 
sör> 
<CcE> 
<63> 
<1E> 
<47> 
<83> 
<CB> 
<C1> 
<@E> 
<12> 
“73> 
<B6> 
<71> 
<DF> 
<QS5> 
<BE> 
<EF> 
<F7> 
<saB> 
<EB> 
<&B> 
<56> 
<38> 
<59> 
<Cc9> 
<32> 
<CE> 
<A3> 
<AB> 
<65> 
x<95> 
<3C> 
x“12> 
<94> 
<72> 
<63> 
<2A> 
<78> 
<CA> 
<DE> 
<D1>r 
<D4> 
<F8> 
<4D> 
<62> 
<54> 
<EB> 
<7C> 
<FD> 
<45> 
<BCc> 
<45> 
<A2> 
<D&ö> 


14AB: 98 


14AB:00 


14629: 08 
14B8: Bil 
1409: 20 
1468: BR 
1409: 00 
13DE:30 
14E8:B8 
14E8: 009 
14F8: 08 
14F8: 809 
15090: 00 
1508:20 
1519: 89 
1518:88 
1579:D8 
1528:B08 
1530: D0 
1538: 88 
1540: AA 
1548: AA 
13309: Afı 
1559: AA 
15508: AA 
1558: A 
157B: AA 
1578: AA 
1590: Afı 
1388:55 
1578: Ad 
1598:55 
1549: 55 
1538:55 
15B9:55 
15BEB: AB 
150.02: AA 
1508: AA 
15D9:D& 
1508: B4 
15EB: BC 
15E8: A5 
15F8: AB 
15F8: A 
15A0: 42 
1608: AA 
1518:55 
1518:&D 
1528:52 
1576: 2B 
1639: 5A 
1638: 2A 
1440: AA 
1548: AA 
1558: 5C 
1458: DS 
1550:55 
1548: FA 
1470: A 
1578: 7A 
1580: BA 
16588: Afı 
15?0:D5 
1698: A 
15AD: 593 
15AB:55 
15B0: Afı 
1488: 2A 
1&C08:A5 
1808: A 
1509: 55 
13D8: AA 
1&EB: AB 
16EB; Ar 
1&FB: AA 
1&F8: 6A 
1708: AA 
17808: AA 
171B: AA 
1718: Afı 
1729:55 
1728: A 
17308: Afı 
1738: AA 
1742: AA 
ı174B: AA 
1792: AA 
1758: AA 
1750: AA 
1768: AD 
177B: A 
1778: AA 
1780: Afı 
1788: AA 
1770: AB 
1798: 4A 





SSBS8 


588 


BEBETSSSSESESSEE 


BEBRBREBBSSES 


AA 


3422422233222 273: 


17AB:B6& ı 


17AB: AA 
17E0: AD 
1768: AF 
17CUB: DA 
17C8B:B2 
1708: AA 
17D8: Ah 
17EB:D5 
1 7EB: 2A 
17F0: AA 
17FB: AA 
18Ad: AA 
1898:84 
181B: AA 


191884 | 


1820: Afı 
1828:B5 
1832: FA 
1838: AA 
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Die Herrsr- Höhle 


Steuern Sie einen wagemutigen Forscher durch 
ein höhlenartiges Labyrinth. Doch Vorsicht: Viele 
gemeine Fallen machen die Höhle zur Hölle. 


ie Zeiten, in denen Bergsteiger und Höhlenforscher 
») noch mit Seilen herumgeklettert sind, sind schon 

lange vorbei. Statt dessen verwendet man heut- 
zutage Hubschrauber-Rucksäcke, mit denen die Forscher 
durch die Luft fliegen, statt umständlich zu klettern. Diese 
Technik macht das Erforschen von Höhlen zwar etwas 
schneller, aber nicht unbedingt leichter, besonders wenn es 
einen in ein so gefährliches Höhlensystem verschlagen hat 
wie den Helden unseres Spieles. 

Auf den Heliman warten Energiesperren und fliegende 
Felsbrocken. Die Wände darf der Spieler ebenfalls nicht 
berühren. Die letzte große Schwierigkeit sind unterirdische 
Seen, die den fliegenden Forscher für immer auf den 
Grund zu ziehen drohen. Wie Sie sehen, muß man aufaller- 
lei achten, um lebend zum Ausgang zu gelangen. 

Um Ihnen die Aufgabe etwas zu erleichtern, gibtesin den 
Höhlen kleine Fackeln, die Sie schadlos berühren dürfen. 
Die Fackeln haben sogar eine sehr positive Wirkung. Wenn 
Sie eines ihrer zehn Leben verlieren, beginnen Sie das 
Spiel wieder an der letzten Fackel. 

Die zweite Erleichterung ist der Turbospeed für den 
Rotor. Durch Drücken des Feuerknopfs verdoppelt sich die 
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Der Heliman in der gefährlichen Höhle 





Fluggeschwindigkeit, doch leider auch der Treibstofiver- 
brauch. Und 1000 Liter sind sehr schnell weg. 

Um eine Pause einzulegen, brauchen Sie nur eine belie- 
bige Taste zu drücken. Das Spiel stoppt solange, bis Sie 
eine andere Taste drücken oder weiterfliegen. 

Gesteuert wird Heliman mit dem Joystick in Port 1. Wenn 
Sie das Ziel in der Höhle erreicht haben, bekommen Sie für 
den verbleibenden Treibstoff Punkte und der nächste 
Schwierigkeitsgrad wird von Diskette geladen. Ein neues 
Leben erhalten Sie für 10000 Punkte. 

Wenn Sie die die abgedruckten Level sicher beherr- 
schen oder wenn Ihnen diese zu schwer sind, können Sie 
den Editor benutzen, mit dem Sie eigene Schwierigkeits- 
stufen ganz nach Ihrem Wunsch entwerfen. Um den Editor 
zu starten, drücken Sie einfach die <SELECT >-Taste. Ein 
Zeichen wählen Sie aus, indem Sie mit dem: Pfeil zum 
gewünschten Symbol auf der Auswahlleiste am unteren 
Bildrand fahren und es dann mit dem Feuerknopf aktivie- 
ren. Das Zeichen setzen Sie dann wiederum durch Druck 
auf den Feuerknopf in das Spielfeld. Wenn Sie mit dem 
Pfeil an den oberen oder unteren Bildrand stoßen, scrollt 
das Bild automatisch in diese Richtung. 

Im Editor liegen einige Funktionen auch auf der Tastatur. 
Mit <L> laden Sie ein Bild und mit <S> speichern Sie es. 
Unter welchem Namen es geladen oder gespeichert wird, 
bestimmt die Bildnummer. Um diese zu verändern, 
drücken Sie einfach <B>. Dadurch können Sie auch 
einen bestehen Level verändern und unter anderem 
Namen speichern. Die Bildnummer wird beim Editor in der 
oberen Zeile eingeblendet. Mit <RETURN> können Sie 
zu einem Testflug starten, ein weiterer Druck auf die 
<RETURN >-Taste beendet den kleinen Rundflug. Mit der 
< START >-Taste verlassen Sie den Editor und beginnen 
ein neues Spiel. 

Wenn Sie Heliman mit DOS 2,5 laden, geben Sie als 
Startadresse »A800« ein. (Klaus Fecker/gn/hf) 
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BaAS:AF BO ED BF 
Länge :4528 Bytes BaBd:BA B4 28 B5 
m re Ber ENTER NASSEN Tee ee BBBB:4C 77 AF AC 

BACcB:AB 91 DE CB 
BaBd:FF FF OO AB DD Ba ACc 38 <CB> DBACB:F5 50 AD 1F 
BRaBe:AB ACC 13 AB 44 Fa 42 497 4> B0D08:85 C9 85 Fo 
BBiB:4C 44 30 58 ZE 44 41 54 X539> BaDe: AB AC BB Bi 
BB18:9B A2 18 9D 4A 85 AFP BB <DB> BBEB:F4 EF F2 ES 
2922:9D 48 95 A? 835 SD 42 835 <92> BRBEBS: BB BA AC ES 
BR28:AF B& FD 44 DS AF Ad FD <FD> BOFO: FGO FO BA BR 
2959:45 B35 20 54 EA 50 AFP Bi <EE> BaAFB:F4 E5 898 99 
B3a38:8D EBD B4 ED 94 B4 BD FB <453> Bin: 78 78 BO 88 
2949:&E BD Fi SE BD F2 6E 8D <37> BiBS:F2 E?F F4 88 
Ba48:F3 GE ED CO B2 ED Ci 82 <BR} Bild:B0 Ba Sg 58 
2u59:8D CA B2 ab CS 82 80 CA <A7> A1l1lS:50 82 89 508 
Be58:2 BD C7 BZ AD 42 85 BD <B35> 21208:858 E08 50 88 
BOSBIAE B4 AD 43 B5 SD AF B4 <9HF> 0128:88 88 88 80 
BRAD 44 B5 BD BR B4 Ab 45 <EE> 2135Q:820 BO BO 58 
2079:03 8D Bi B4 Ab 48 BE BD <B4> 2138:B8A BA 80 88 
BO7E:B2 984 AD 47 B5 SD BS BA <34> Bi4dıEh EC FS E?7 
BBEB: AD AA DS BD BA B4 Ab 4B <45> B14B8:BA BO 508 58 
BESB:B5 EBD BF B4 ZU BF BZ AF <ED> B150:80 EB 80 B8 
BRPB:BC 85 DB AF AB 85 DPF AB <2E> B158:E0 BG Ba Bu 
BBFE:BB AF 38 #1 DB CE F1 DB <ACH 2159:59 32 88 58 
BaAB:A? 135 85 DE AP Bi 85 DD <88> B1&sd:688 80 B3 BU 
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04 A? 50 BD 2172:92 88 ga BR 89 52 BB <ED> 
AE 20 FD BE 539> B17B8:88 89 BZ 90 Ba 25 ID BZ <BS> 
B? 04 BF D& {EB} 2189:AF AC SD A2 B4 AP 55 38D <18> 
CC BA 84 Da <16> B188: AZ 84 AFP 50 ED 97 D4 AFP <48> 
Da C# B& FB “BB 21989:35A 8D ZF 82 AF 82 5D ID {4b} 
B4 30 4C 308 <öf> B198:Da A? 35 8D Ce 82 AP CC <Bl> 
989 BO B2 EF X78> BIlAB:SD CI ZZ A BD CI RR SIE> 
EE 88 71 FB <45> BiAB:AF 74 SD C7 BZ AP SZ 80 <SIE> 
Fa ES EC 80 <BB> 8B1B2:C5 82 A? BA 8D CA 22 Ar <7B> 
Ba FS EE ER {9C> B1B3:?28 8D AF BZ A? EB 85 58 {SBE> 
7a Fa Fa FO <AS> BiCB:AF B7 BS 597 AF CO BD BE <7A> 
8a 88 B3 FB {XC7> B1C8:D4 AP? BB 80 97 Ba AF BD <CA> 
27 977 77 977 <EI> BiDG:8D F2 B4 SD 85 B4 BD B7 <135> 
S9 588 89 BB <ED> 2B1D8:84 8D B& 84 ED F7 B4 AP <SBE> 
eo 20 Bo 20 <ES> BIEB:FF SD FC B2 AD BO BF 20 <C2> | 
Sa 52 50 88 <DD> BLIES:BZ 77 20 B& Ca Ca 3 De {FF> 
Bea BE BG Bi D5> BiFü:FS AF 28 BD 30 BZ AF BA <45> | 
99 32 88 BA <D7> BIFS:SD 31 B2 AD 20 B& BD Ad “DB> 
B4 ES FS FA <BD> 22720:04 BD BE B4 Ab Z2E BA BD <SF> 
59 82 BA BA <DB> B7BB8: A7 B4 18 AD 23 B& SD AF {SB2> 
88 BR 80 EB <BB> 8210:04 547 BE SD B7 B4 ED Ak 95> 
82 BB 92 BU <AD> 3218:84 AD 24 84 BD ACC 84 57 <“BZ> 
80 BB 80 BB AS> B228:02 9D AB 84 BD 24 BA 15 <15> 
82 BO 88 BR <FPD> Br2B: AD B7 B4 49 GE BD 95 B4 <DF> 
Sa 29 Ba 89 975> B235B: AB 24 BA 597 B2 SD FD B4 <5RA> 
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8238: AD 8D 84 C9 01 DO DA A9F <Q7> 0540:59 BO SD ZE B& 4C 54 BS <EE> 0948:24 24 24 24 24 24 24 24 <56> 
0240:265 ED 27 06 A#F A9 SD 28 <2D> BSAB: AD 24 0& CD 9D BA Da IC <G1> nes: 24 24 24 24 24 24 D4 41 <2C> 
28248:06 A? 80 BD BE B2 AF B2 <FF> 550: AD Ak @4 SD B7 84 AD AB <30> 0858:?20 84 2 na aa ma zo aa <F9> 
8250:8D0 81 82 A9F 77 BD AB B4 <D2> a558:04 8D 24 84 ?8 CD AD AF <A4> AB Ba De 3a 21 35 35 25 <DOC> 
8258: A? 88 8D Al O4 AF Ab BD <5A> BS56B:01 5D AB Ba AD 25 B5 CD <BE> B0848:00 Bd Do ne ma na ma Ba <75> 
D2s0:n4 4 20 77 AE AFP 58 BD <14> 0568:95 B4 FE DC CE AB B4 AD <43> 2870:659 65 &C 4b 59 SD 41 SE <> 
22458:01 DZ AC 4A AB AD SD 84 <BB> BSTB:AB 84 CH DO Fa Bi &B A2 <54> 2378:00 da DO De ma Am AF BF <9O> 
8278:C9 Bı DB B1 A8 18 Bi DE <C5> a578:08 18 AD 25 O4 697 Bl 8D <BF> aB880:B4 92 B& AF AE 808 EB EC <Aad> 
B@278:457 QB1 91 DE ACC 89 AA AD <Al> 2530:B7 04 BE AS 24 AD 24 B& <D4> ASSB:E1 FS F3 980 E& ES ES EB {20> 
B288:8D 84 C# 81 Da Bi 48 18 <CE> BS5B8:67 BO ED 24 Bü 50 AD 8D <CF> BBIG:ES FZ 88 BB B2 AF A7 BZ <E&> 
2288:B1 DC E#F 90 ?1 DC AB Ba <B4> 2590:84 C9 Q1 DB 83 4C BB Bi <SB> B378:A1 AD AD AF AS B2 B4 B0 <B8> 
22790:B1 DC C9 SF FB DA C9 9A <SB> 0578: A2 BE BE 1E DE 85 4D AB <56> B3A2:B7 AF B2 AA AS BE BE 89 <E9> 
82978:F@ 17 C8 CO 508 DO Fi 50 <DB> BSAB:FE 58 CO Be Da FB ES EB <9D> gDsAB:BO SA Ba BE 88 ES 597 58 <27> 
BZAB:AF 99 91 DE 88 18 Bi DE <57> BS5ABS: 05 Da F4 AD FC 82 C9 DOC <F&> B8B2:F71 97 98 97 BO DO DO DB <DE> 
A2AS:EF BO C9 7F FO 14 91 DE <11> BS5BQ:FB DE C9 FF DO 34 AZ 78 <BF> Q3B8:00 DA Do na 24 32 35 25 <42> 
B2BB:A4C 9A AA AF FO 91 DC SB <4D> B5BS:AD 84 92 CF BO FO GA BE <SC> B8C09:753 7B 25 BB 73 74 81 72 <72> 
82B85:18 Bi DE 58% gl 71 DE AC <95> 85C2:02 D2 32 AF7 B2 5D 72 B4 <öl> 88C8:74 a0 35 ?2D O0 ?1 ?E ZA <26> 
B2CB:SA AA AD BE 84 C9 Bi DO <B7> eSC8:A7 SE BD BD D2 Ad 35 28 <C7> 2808:35 24 21 ZE 27 25 ZE 88 <F5> 
B2C8: 06 AF OO SD BE 84 AO Al <92> 25D09:797 AA 58 29 Ca AB A2 BB <“91> BEDE:DO DO DO DO DO Da ma A <BCc> 
22D8:30 AS EE 92 84 A® 11 BD <2F> aS5n8:8E Bi D2 8& 4D AB Aa Ca <SD> BSEB:B2 BS AS AZ AB AS BO FS <CF> 
22DB: Aa B4 AF 22 8D Al B4 AF <80> B5EB: Ch 52 DB FB EB EB 34 DE <FA> BBEB:ES EC ES ES F4 80 BS AD <E9> 
PZEB:ED BD A4 B4 28 10 AC 20 <97> BSES:F4 50 AP FF BD FC 02 20 <aA> BEFO:BB A? AF Acc As AS B2 80 <75> 
B2EB:FZ2 AD AF 335 BD AB 84 AF <ES> 2SF2:CD AD 28 CD AD EE AB 84 <DF> BSFeE:BA B5S 80 AS B2 BS B4 AS <41l> 
BZFB:44 BD Al 94 AF 22 BD A& <D7> BSFE:AD AB B4 CH BE FO 46 AZ <o8S> BB: AC AC AS AE BO SO BO 80 <45> 
B2FE:BA 20 1B AC 28 92 AD AD <D5> BE: de Zu Ca AB AD 78 BZ 55 “D7> BIAE:SO BO SE BO BB BO BB Ba <ES> 
B320:92 84 CH 82 DE CC 99 88 <ac> 0628: 4D C9 BF DA ıC AD FC 82 <SD> A71d:ED ED BO BO Hu SA 58 38 <DD> 
B3BE:E8D 92 Ba AD 7B 02 C9 87 <21> 0819:C7 BC FE BB C9 FF Da 11 <25> BI18:808 SO 80 B7 AF BA AF B2 <C9> 
BS1d:F@ 35 C9 BE Fa 25 CH DD <97> BölS:EO Bi Da DE AC FE AD AD <DB> 0920:AS AE 808 970 90 89 88 Al <5A> 
BZ1IBıF@B 27 C9 OB FO ?F CP Ba <7D> D520:5D 84 CF B1 DE DB 4C BB <> BIZR:AS BA AS Al 80 Fa 9 BB <bE> 
2328:F8 10 C# 85 FO 83 Ac CC <9B> B&28:ıBi A? FFOED FC B2 AD AA <eA> B730:80 BO BS AE AB B4 A5 88 <al> 
B328: AA EE 81 B4 EE Ba 84 4C <Da> 2550:84 SD B7 84 AD AB B4 BD <45> 2938: 920 70 78 FO 90 70 sa aa <B7> 
B3352:CC AA CE 81 84 EE 88 84 <35> B558: 24 B& AF BB BD AB B4 AP <Aa> B949:50 BO 50 BS BO BZ AFP B4 <Ad> 
B338:4C CC Ad 51 B4 4C CC <EB> D&40:58 SD Bi DZ 58 AZ BO 18 <42> B748:80 FO Fa sa PO SA BA BA <B4> 
23548: AA EE 81 B4 4C CC AA EEE <BS3> Bb48:AD 25 06 EF DB BD B7 B4 <äh> A9SB:BA BA SA BA BA BA BA BA <BB> 
2348:508 84 AC CE AA Acc Ab AB <DB> BASG:BE AB B4 AD 24 Bü EI BB <45> B7S5B:BA BA BA Ba Ba BA BA BA <8?2> 
BSSG:EE 92 Ba AP 77 BD AD BA <I> 2658:8D 24 86 CD Al B4 FB 05 <99> BAR: BA BA BA BA BA SA BA BA <7A> 
0358: A7 88 SD Al B4 AF 56 BD {50> Bäösß: ac ER AD AD 23 Ba CD AP <S0> BIER: BA AZ 18 9D 42 85 AF OO <E?> 
Ant DB 2a 1m Acc 20 92 AD <EA> 26568:04 DA FS AZ 01 BE ABS 04 <B> B979:90 48 83 A9 DB 9D 49 8S <BE> 
0358:A9 55 8D Ad 04 AF dA BD <CO> 236570:4C FB AD AF 84 8D 45 B& <B5> BF78:AF OA 9D 44 BZ A9 64 9D <55> 
BT7B:A1l DA AF 44 SD As Ba 28 <54> D67B:AB BB 20 79 AA AD Ab B4 <76> 0950:45 85 20 54 E4 68 A2 10 <53> 
B3578:18 AC 20 92 AD AD 92 B4 <> B4E0:5D Ba m4 AD A7 B4 AD ZE <728> Q988:A9 BC SD 42 DS za 5a EA <55> 
2380:C9 82 Da CC AF BO BD 92 <9B> QBAB8:B06 AD Ba BA ED AS 04 AP <89> 0992: AD AE 04 SD 42 03 AD AF <S5E> 
@388:84 AD 78 82 C# 87 FD 29 <76> 2470: AZ BB FD Fa 535 9D Fa <SOR> B978:84 BD 45 85 AD BO O4 SD <29> 
3378:C97 BE FO ıF C9 BE FB BF <9B> 04978:54 EB EB FF DO FS AD AZ <02> BAD: 4A DS AD Bi B4 BD 45 DI <i14> 
83598:C9 OD Fa 11 C9 BA Fa 1C <BF> OA: SD SA BA 19 AD AS O4 <BE> BIAB:AD BZ O4 SD 48 035 AD BIS <59> 
B3AB:CH9 287 FO 21 46 aA AB CE <dB> BAAB:SBD 81 B4 ED BB B4 59 11 <7B> QB97BO:84 SD 49 83 AD BA 84 5D <57> 
2a5A8:81 B4 ACC AA AB EE 81 B4 <B> BEBB: ED EC B4 AP EB BD 83 DZ <F7E> BI7BB:A4A OF AD BS B4 8D AB 85 <7F> 
23B0:4C 4A AB CE 80 84 40 4A <9a> B4BB:2B 92 AD 20 Zu BS 20 92 <AT> B9C9:60 A9 FF ED FC 02 za 3D <FA> 
BSB8:AB 4C 41 AB CE 81 94 CE {44> B&cH: AD 20 20 ES 20 92 AD 20 <SB> BSCB:B?2 A979 O1 BD 80 Ba AF AB <54> 
B3CHh:50 94 4C 4A AB EE 81 B4 <C9> B5C8:28 B53 28 235 ACC 28 92 AD <B0> 2397D08:5D ?7B B4 A497 02 BD FC D& <b> 
BS3SCB: CE 898 Ba Acc 4A AB CE 81 <FB> BsbB: 20 28 BS 20 92 AD 20 28 <ZD> BFDB:AF 32 ED 898 84 AF CH BD <1A> 
B35D9:B4 20 SC AC 4C 25 AC AB <aD> B6D08:6E5 20 92 AD AE BB O4 AF <7O> BFER:B1 B4 AF E& SD CO B2 AFP <BC> 
2308: 352 20 77 Ak AD Ba 4 BD <AA> BEEB:FF FD FA 553 MD FA 54 EE <DA> BIEB:AA BD Cı O7 AP 52 SD C5 <D8> 
BIEB:A2 84 AD 51 B4 BD AS B4 AFFS> BSsEB8:BZ2 DZ EE 82 DZ EE 58 84 “Bir BFFO:02 A97 DA BD Ca 97 59 DB <B> 
B3SEBS:AD 2D B5 BD A& O4 AD ZE <Fh> BAFB:EC SC 84 DE C5 AP DR BD <99> BIFE:SD 77 BA AF DR SD 92 Da <iF> 
ASF2:86& BD A7 B4 AD AS B4 ED <C7> DB6FB8:B35 D2 9D Fa 55 FD Fb 54 <7A> BAZGB:ED 84 DA ED AA BA BD 97 <56> 
BSF8:B& B4 AC 23 AC EE 81 84 <90> Bra: AD 96 B4 CH Da Fa Da 20 <IF> AADE:a4 SD 93 DA 20 OF B2 20 <BA> 
0400: 4 25 AC 78 &D AE ac 75 <44> D7BB:E4 AD 50 AP BI 80 F4 BA <75> BA1D:42 B4 4C C3 B2 AB DO BR <F5> 
B4BBLAC AD 92 84 CH 01 DO 17 <O8> 0710:85D AS B4 208 SE AD 28 CD <FB> BA1B:C2 B7 99 20 24 CO CO 32 <B4> 
D4iB:EE 81 O4 4C 23 AC AD B4# <CB> B71B8:AD 28 CD Ab AD 78 82 C9 <äl> BAZB:DR FS AD 27 O6 85 DA AD <FB> 
a418:D8 CH B4 Fo BA CH 82 FB <Eö> D728:BF DO 835 4C DD AF AD Ai <F5> AA28:728 B& 85 DB AD 41 96 85 <1T> 
B420:E2 C9 BB FB E4 C9# 81 FO <7F> 0728:04 SD B7 B4 80 25 86 AD <24> 2530:D& AD 42 B& 85 D7 AD 23 <EB> 
B428:Da Zu C4 AS AE B1 94 ER <9B> 273gı AB B4 8D 24 B& A? BO BD <CC> aAZS:B4 BD B7 84 AD 2D B& BD <H4> 
B4308:BE FA 98 EG 44 FB C& AD <90> 27385: A8 04 42 DB BO IC 18 9C <C2> DAs0:BE 94 AD AF DO Ad BB 99 <DF> 
3438:B0 04 65D 90 DO ED Bı Da <39> 2748:798 SO 58 CO Rt 28 38 18 <43> BA4S:Fa 55 997 Fü 54 99 08 50 <or> 
B440:AC A4 94 B9 55 AF 9D Fa <Afh> @748:10 18 IC Da Bo DO Ga ıCc <al> BA5B:977 B0 51 97 08 52 99 08 <DE> 
2448:535 EB CB CC Aa 84 Da F3 <S1> B7’s52:1C 10 38 28 48 28 BB 88 DD> 2458:53 CB CO FF DO ES Ad 00 <Fo> 
B450:E38 FD Fa 53 AE 81 Bi BP <DCH a7sBı098 BB 15 Od ma Da 90 3C <A4> BA&s0:E97 57 Ba 99 DS SI CB CO <9A> 
0459:35 AF 9D Fa SA EB CB CE <5B> 2768:18 iC ı0 98 Ba Ca 88 AS <EB> AAsB:CcH DA FS AD GO E9 ıA B7 <CD> 
0450: A1 04 DA FZ 20 20 B5S EE <B9> 9758:89 90 10 10 7a 00 oa Ba <FC> 2470:97 808 53 CB CO 58 DB F5 <54> 
g448: AD BA AD AD B4 C9 BO FG <7E> B77B:Ba IC IC 18 38 28 58 28 <20> BA7TE:AU DO BF 72 B7T 97 ZB 50 <D7> 
0470:01 4A AB 21 Bi DE SD SF <77> 2778:80 80 30 on 10 BO BO Ba <a7> BREB:CH CO 42 DB FS5 &0 48 SA <4l> 
B478:04 AD 25 20 67 AA AD 21 <87> gran: Bd 3C 158 58 BB BR DD 85 <A7> BASS:48 98 48 AF 50 AE Fi &E <07> 
8@4898:B1 DE CD BF B4 Fa 05 AU <74> 3788: 01 15 1D 27 08 BB 38 u9 <51> BAFB:AC FO SE BD BA Da BD 87 <ZSF> 
@488:B0B 28 47 Al AB 35 270 77 <B8B> 2792: Ba Ba ma 38 ZB BB IC 14 <3E> @AF8:D4 SC 17 DE BE 18 DB AD <BB> 
24h AP DO ED AD Ba AD ZE <E7> 0778:1& 14 DO Da DE Da De BG <Ch> BAAB:FZ SE 8D 165 DB AD FS &4E <AI> 
0478:06 CF ZB Da 48 AD 2D Ba <75> B7’RAB:BO Ba BB 3C 18 37 89 Bi {17> BAAS:ED 17 DO AD AS B& BD 05 <71> 
34A2:C9 AB DA 41 A? DE SD 43 <EB> B7’AB:DI 95 BO 14 IC RS 98 GB <52> BABB:D4 AE B7 94 AC BES Da AD <2A> 
B4AB: 5 AD BI B4 CF BD DE 73 <TB> 07’BB:BE DO Da DR Ba 32 358 BB <ZIiF> BABS:AB 04 8D B4 DA BE 75 Oü <Ba> 
A4BB:AD 8D 24 CH Bil FO 59 AFP <DI> @7BB:1C 14 15 14 BO Da DO BG <DD> BACB:SC 7D 04 58 AB 58 Ah 48 <C5> 
@4E8: 01 SD BE 984 Ad 32 20 77 <I1> Br7CO:B8 BB BO FF SF CE FS FF <D4> DACH:4B A? DO ED BB B4 AD 78 <IF> 
BACH: AA AD BE 084 CH 01 DO 28 <E4> B7CB:ı3F CE FS AA 28 SS 28 28 <Ab> SRDB: 2 SD 78 B4 C9 OF DO BC <BA> 
BACcB: AGO 21 Bi DC BD BF Ba Ab <77> : 87D8:28 28 Ah 28 28 ES BC Co <59> BADB:29 ES B4 20 CD Ab 22 75 <90> 
24D9:24 20 47 AA Ad 21 Bi DE <ISF> 2708:33 oa 3a F3 FF 3F CC F3 <Bö> GBREB:BS AC C3 BZ 20 75 BS AE <DF> 
2408: CD BF B4 FO 25 AB BB 20 <B7> B’EB:FF 3F CC AA 28 28 55 28 <B2> DBAEB:F7BS B4 AD Bi B4 ACC B9 B4 <So> 
B4EB:A7 AA 4C Ba Ac 4C 1E Ab <F3> B7EB: 28 28 AA 283 28 BE CE DC <5D> BAFRB:EB BE Fa BF EB OD Fa 2C £77> 
D4ES:AF DA BD FO S4E BD BE B4 <B6> B7FB:CH 328 BCE CC FS FF SF CC <97> GAFSIEB 07 Fo 49 EO BB FO 52 <25> 
B#F8:8D Fi GE BD F2 4E BD F3 <47> B7FOö:FS FF SF AA 28 28 28 55 <AS5> BB@0:4C C35 BZ C9 41 Fa 55 18 <47> 
B4FB:4E SD Cü BZ ED Ci 02 8D <77> BB00:28 23 Al 28 78 7C 35 38 <äac> GBOB: AD 953 94 EF 27 BD 93 84 <ZF> 
B5009:05 82 BD Ch 82 AB 15 20 <54> BBBB:BC SC Sa SF CC FS FF SF <82> BB1B:18 AD 96 BA EF 27 SD IB <BA> 
25988:657 AA A? 2D SD BF Da A9 <Sc> BS1B:CC FS FF Ahı 28 28 28 28 <A7> 8B18:04 AD FC 04 EF 00 ED IC <aD> 
93519:34 BD BA 84 25 BS AB 28 <1F5> B318:55 Z8 AA 28 28 me Ca BC <81> BE?7B:04 AC 59 BZ C9 Ei FO 34 <47> 
BSlS:1& B4 20 FD BS 4C 77 A9F <48> 28920:F3 BB BC 81 BB 14 55 55 <89> @B28:18 AD 93 D4 597 28 SD 95 <DE> 
0520:4C BB Bi 68 EE AS Ba AD <12> ve29:14 BB “D 40 99 14 55 55 <9TE> GB3R:94 18 AD 9B 04 597 ZE BD <48> 
2528: A5 B4 E97 BE FE 01 AB AP <25> 23552:14 BB Bı 7a 79 5& 54 BO <96> BB38:9B B4 AD FC B4 67 DB BD <4E> 
B530:00 18 AD 20 BA 57 28 SD <3B> Be39:19 42 15 B1 20 82 18 44 <EB> j 
@538:BS 04 BE AS 84 AD ZE 8% <SE> 2840:00 64 24 24 24 24 24 24 <S3C> »Heliman« (Anfang) 





BB4B: FC 
BBAS: 13 


BB52:57 


BES8: 04 
BB&d: FB 
2B48:C7 
BB79:C7 
BE7S:4C 
2B80:D8 
BBBSB:ıF 
BBFBO:4C 
BBFE:BF 
BBAB: 37 
BBABS:4C 
BBBR:DB 
BBBS: 1E 
BBCH: 18 
BBCH: SE 
BEBDB: BC 
BBD&:B& 
BBEDN: 45 
BBEB:EE 
BBFO:&E 
BBFB: 64 
BCaB:4C 
Das: A? 
BC1B:AC 
BC18:B4 
2C20:D8 
BC78:DEB 
BC30:DB 
3038: 3A 
BC48:A? 
BC48:18 
2BC50: 40 
2658: 67 
ACc&0: 08 
BC58: Bil 
BC7O:B2 
BC7B: BE 
BC328: 74 
Scd8: AD 
BEP: AD 
BC9B: AD 
BCAB:&6D 
BCAS:BS 
BCBR:B3 
BCBS:EF 
BCCB:CE 
BCCB: 84 
BCDB: 28 
BCDS: 04 
BCEB: Bi 
BCES: AD 
BCFB:ED 
BCFBE 31 
BDBB: BE 
BDBB: 3C 
BD18:GD 
An018:61 
BD2B: E83 


Ba1B:Ail 
Dar: Al 
Ba2Ba:Al 
Bad: Ai 
BaFB: Al 
Das: Al 
2048: Ai 
Beast: Ai 
Ba58: Al 
Bas: AZ 
Bass: Al 
29708:30 
BaFB: Al 
Basta: Ai 
Da: 
BF: AE 
BaAFE:BO 
BaAB: Al 
Baar Al 
BOBU: E98 
abs: Ba 
Bacdı 39 
DaSCH: Al 


BRDB: Al 


Dans: 88 


597 


AB 


eshumem 


er 





BD2B:B4 
BDSB:EE 
an3B:FB 
2042: [9 
2049: 50 
DDS2: 84 
DDS8: 40 
BD&5B: BF 
BDSB: EB 
BD7a: a8 
3078: 08 
BD8a: 50 
anaß: 40 
BDF7B2:B4 
BDF7E: 99 
BDAB:B4 
BDAS:CB 
ODBG:B4 
BDBB: A7 
BDCB: 1GB 
BDCB: 30 
BDDB: Ba 
BDDE:B4 
BDEB:BS 
ADEB:CB 
BPFO:SD 
BDFE:CH 
BERG: AD 
BEBB:r2D 
BEiB: AD 
BE1B: AD 
DBE2B: &D 
BEZB: AD 
BES5B:18 
DES3: 04 
BE48:B& 
DE48:18 


BESG: 22 F 


DES8: AA 
BEAB: AA 
Bes AA 
BE7B: AR 
DE78:B8 
BESB: 22 
DEBB: B0 
BEFB: AA 
BEFS:AB 
BEAd: BA 
DEABS: BB 
BEBB: BD 
DEBEA: AA 
BECH: A 
DBECHB: 2A 
BEDB: AB 
BEDS: BO 
BEER: ZA 
BEEB: AZ 
BEFB: BO 
BEF8S:B2 
BFBB:28 
AFOB: DO 


DRER: OO 
BRDEB: DA 


BarFB:Al ı 


BOFB: Al 
B1i20: 00 
BiBs: 00 


2B110:08 | 


BllB:Al 
B12B: Al 
Bi7B: 50 
21350:00 
23138: 080 
3140:A1 
a148:B8 


2150:80 


28158: 00 


2150:B8 5% 


B1&8: Al 
2170:B88 
2178:04 
D1B08:88 
B1B88: BDO 
air: Ai 
B1lFB: BR 
BiAB: ON 
B1AB: BR 
B1BB:Bi 
B1BSB: Ai 
8B1CB8:A7 
B1C8: BB 
B1DB: 38 
B1D8a: Ai 


Au 


BSRBESSSS-BESBHB 


D& 


SERSDBSENSLRRNEREDANDDERFSHMD 


AD 


c8 


BiEB: Ai 
BIEB: Ai 
B1F8:809 
BiFs: BO 
Bzad: Al 
A208: Ai 
B218:A1 
3218: 00 
2220: B0 
9228: A? 
22738: Ai 
3238: Al 
2240: 00 
2248: 00 
2250: AB 
2258: Al 
B7sB: Ai 
B24A 


8270:00 
B27G:AD | 


2288: Al 
0288: Al 
2299: D09 
22378: A7 
22AB:84 
B2AB: Ai 
B2BB: Ai 
B7B3:0908 
B2CB: Ai 
B2CB: 80 


AZDB:AI ı 


BRSSSBRSRSRPEBSFRBRSE-EBSSUrSB 


BFIB:AN AA A2 AD AB 
BFiE:AA AA BA BA On 
BF2B:FF AF AB Ah AB 
BF2G:AF AF AB AA An 
BFSG:FF FF CE Ah AA 
BFSS:FF FF BE AA AR 
BFAB:FF BF CF AA AA 
BFABıFA EA EA AA AA 
BFSO:FF FA EA ER FA 
BFSB:FA EA EA FA EA 
BFERIAB AB AF AB AF 
BF&EB: OR OU RO Zu DO 
BF7O:20 20 20 oo ma 
BFTBE:FF FF FF FF FF 
BFS@:AB AB AB AB AB 
BFSB:EA EA EA EA ER 
BFFO:SFF AA AA AA AA 
BFIB:AA AA AA AA AA 
‚ BFAD:GD BA BA DA 00 
BFAB:BO BO 20 nu om 
BFBO:SS FA FA 9A 55 
BFBS:B1 B4 10 40 40 
BFCD:24 94 94 04 28 
BFCB:70 70 46 EB B7 
BFDO:BE 90 82 19 44 
BFDE:B4 94 Q4 DA 04 
DBFEO:DA Q4 94 DA 94 
BFEB:44 51 BB 94 04 
BFFO:B& DO Da DR 20 
BFFE:6S 64 69 74 6F 
1290:20 20 20 oa ma 
1008:89 00 20 sa 2m 
iD10:80 50 50 80 59 
1N18:898 89 80 BE 50 
1220:80 82 80 Ba 50 
1078: 80 80 50 80 98 
1250:20 BO 80 99 B9 
1038:80 80 80 Bu 80 
1B40:E4 88 AE F2 59 
1048:78 80 80 80 50 
1050:80 SO BD 50 89 
1958: Al AS Ab BS A7 
1260: AA B7 Bi AB AC 
1968:B89 BZ A4 AB A? 
1870:8B F9 FA 80 80 
1078: FB 80 530 80 Fa 
1259:B9 88 ZF 32 80 
1098:028 00 ao oa om 
iB9B: 00 DO ma 9D 0m 
1078:00 29 aa ma aa 
imMNd:FB 80 SD Ba F7 
10AB:0B Ei 80 E2 80 
1DBD: SD 50 5D 82 80 
1068:80 88 29 80 90 
1dC0:20 Sa SD 80 52 
1@CB: FL F2 FS F4 F5 
12DQ:20 282 am 03 00 
10D8:28 BB 86 &A &B 
1BEQ:&F 07 87 80 00 
»Heliman« (Schluß) 


04 


SUERSABBSEBEESÄARFBUBRBUIHBSHEHRSES-SRANBRIHDLEIUNSWMPTIIEPBTIND 


2 
je 


BERSRISBSFNBIBARMSE 


SMErSBBBUÜBSBESNBNMUNBSHBRSBHESEBSHÄFS- Er SHDBIBPBNNÄEHPPEP RP rANG 


2 
ei 


SRRIBSENEBERERSS 








BPEB: BOB 
DPEB: AI 
BZFB:BO 
B2FB: Al 
BSpf: Al 
2328: 00 
B31B: Al 
2318:B08 
2320: Al 
BE2B: Al 
233590:28 
2338: Al 
23401 B4 
3348: Al 
2350: Al 
23558: 00 
8358: Ai 
B36B: Al 
D370: Ai 
DBS7B: Al 
2788: 98 
2388: AD 
D3978: Al 
23578: Al 
DAB: Ai 
Bas: Bm 
03B9:63 
B3B8B: Ai 
23C0: Al 
B35CB: Al 


509: 09 | 


23D8: 80 
DIEB: AZ 
BIEB: Al 
BS3SFB: Al 
BSFB: 58 
Bad: 
2498: 
9841B: Al 
2418: Al 
B428:E2 
2428: 00 
34350: 00 
9458: Al 
2448: Ai 
B44G: Ai 
2450:50 
2458:ı88 
944: 
B4äB: Al 
3472: Ai 
2478:80 
0450: 30 
2488: Al 
B498: Al 
24978: Al 
B4A0:BS 
24: 
34B0: Al 
B4BB: Al 
BB: Al 
B4C8: Al 
24098:82 
094D8: Al 
D4EB: Al 
DB4EB:AL 
B4FB: Ai 
BAFB:A?7 
DSB: Ai 
B5B: Ai 
25108: Al 
23318: AD 
B520: AD 
03278: Al 
B5328:A1 
3538:B7 
2548: 858 
2549: 01 
2550: Ai 
23358: Al 
2542:889 
2548:80 


0578:58 


3578: Al 
B5hl 
2588:80 
25970:88 
2578:88 
Ss: Ai 
Baar Az 
2568: 88 
B5B8:80 


25C0:88 
2SCcBr Al 
9508: 88 
2SsD8:80 








er 
B: 





DSEB: BO 
BSEB:BD 
DBSFO:B& 
BS5F8:808 
DEDG: 50 
Bad: 30 
235108:808 
B518:B&ä 
D520:80 
B428:80 
2530:009 
0538:50 
9540:Bä 
0549:88 
2650:B5 
0559:00 
Bahr: hl 
Basgı: Bh 
2478:88 
0578: Al 
Bas: Ai 
2608: Ai 
85979: Bö 
2698: Ad 
Rad: Ai 
BahB: Ai 
B&BB:A1 
B&BB:B& 
B&acH:B& 
Bach: Al 
B5sDB: Ai 
B&ADB: Al 
DER: BE 
B6EB:B& 
DAFB: Al 
BEFBS:Al 
Br7Ba: Al 
08728: Bä 
2718:B& 
B71B:Al 
D72B: Al 
0728: Al 
2730: B& 
B873B:Bä 
0748: Ai 
2748: Ai 


0738: Al ı 


9758:Bö 
B75d: BA 
Dr7ba: Al 
D77RB: Ai 
Br7B:Al 
2752: Bö 
2788: Bä 
BrIB: Al 
B79rB: Al 
Bra: Ai 
D7ABıB& 
B7’BB: Bä 
B7BB: Al 
Dr7cB: Al 
B7CB: Al 
SB7DB: BA 
B7DE: B& 
D’EB: Ai 
BFEB: AI 
DB7FB: Ai 
B7’FB: Bi 


DE 


BoBs: Al 
B81B8:1A3 
BBlE:AE 
2920: Bä 
BB28:BA 
BB3B: Al 
2538:58 
2840: 890 
2548: B& 
2959: B& 
2959: A1 
BB68: 898 
0948:88 
BBE7B: Bü 
B878:B& 
2898: A3 
2988: 80 
B8728:808 
23878: B& 
BBADB:ıB&A 
Band: 88 
39B0:88 
98B8: 82 
BecHı Bi 
D8C3:B& 
B800:859 
B2D8:80 


DEBBRB-SSOURSSASS 


D 
je 


| | - D 
BEREIEBEPERERZELFERZERS ZIG 


Ai 


Ai 


Al 


Bar 


Do 
[5 


BRSErS 


BBEB: BZ 
BBEB:B& 
BEFB: BA 
BBSFE:B0 
Dad: 
29B8:80 
8910:B& 
2918:B8 
2728:08 
BI2B: BU 
2738:08 
BI3B:A1 
BFAB: Ei 
BIA4B:E1 


B750:E1 | 


89758: B20 
Brad: Ai 
BFAB:El1 
AFFBIEi 
BF7B:Eil 
Brad: A7 
BIBB: Al 
DF7B:E1 
B9FB:EI 
BrAB:FS 
BIAB: AB 
BFBB: Ai 
BFBEB:rF3 


BICH:Föa | 


BICB: Al 
BFDN:Al 
B97DB: Al 
DIEB: AI 
BIER: A1 
BIFB: AI 
BOFFB: Ai 
BABB:A1 
BARS: Al 
BA1B:A1 
BA1B: AI 
BAzZD: Ai 
BAzB: Al 
BA3B: Ai 
Bad: Al 
BA: Ai 
BAsB:A1 
BAR: 
BASS: Al 
BA: Al 
DASB: Al 
BAFTB: Ai 
DBA7B:A1 
Asa: Al 
BABB: Al 
BAFBE AI 
BAFB: Ai 
BAAR: Ai 
BAaBıAı 
DABB:A1 
BABB: Al 
BACH: Ai 
BACB:ı AI 
BADB: Ai 
BADB:A1 
BAER: A1 
BAESB: AL 
BAF@:B2 
BAFB: DR 
BEBd: Ba 


»Level i« zum Abtippen 


Frogrammname :BILD®1.DAT 
:2815 Bytes 


nBazda: Al 
BB: Al 
DaSsa: Al 
BRa9: Al 
Dahl 
se 


2253: Al 


Bari 
BB&sB: hl 
2278:58 


Ba7s:Al 


233: Al 


»Level 2« (Anfang) 








“= = Bu ZimSalaBim Le 
Schaffen Sie he ein wa = 
(Adrebverwaltung. ei = | 


interessantes Nachschlagewerk und 














mit Ereinar Zugeili (66) Erg 
| ger 1 
Die Mini-T 
©“ 2% ® ® I Nachhall auf Seite 160 in B/85 
zeitig ein we es IV 
i = Einlkiieie ins YGPE SE 3873 
Eins tolle arbeitung Fr den Seluneicer (464) 33 
Nachhall auf Seite 85 in GES 
Funktionen optisch Ben A Lanez) er 
" = " = Finanzen mit dom Commorore 
Kennen Sie alle »Aappy Computer«-Ausgaben von 1985? Suchen Sie einen ganz bestimmten Nachhali aufSonte IT mess ws 
Testbericht? Oder haben Sie einen Teil eines interessanten Kurses versäumt? Suchen Sie nach Nobenkomenabrechnung (E62) a 
einer speziellen Anwendung? ui ange re ee re 
Damit Sie jetzt fehlende Hefte mit »Ihrem« Artikel nachbestellen können, finden Sie auf diesen Nachhall use iTmarss Rr 
Seiten eine Zusammenstellung aller wesentlichen Artikel der noch lieferbaren Ausgaben. Nabe Zen Intoprear fr für Atarı BOOXL (.d.M.) Ba 
Und so kommen Sie schnell an die gewünschten Ausgaben: Prüfen Sie, welche Ausgabe in er Bhkaute Graz it arcı Befahlen (CPC 464) 24/10 
Ihrer Sammlung noch fehlt, oder welches Thema Sie interessiert. Tragen Sie die Nummer Spectrum) 108/12 
m ri : 1 v = Cralk-Window bekommt Nachwuchs (7 64} Bald 
dieser Ausgabe und das Erscheinungsjahr (z.B. 2/85) auf dem Bestellabschnitt der hier Nochhall aa Saite 20 in 12/05 ne 
eingehefteten Bestell-Zahlkarte ein. Die ausgefüllte Zahlkarte einfach heraustrennen und Hiros Fantauy Co) 58,3 
Rechnungsbetrag beim nächsten Postamt einzahlen. Ihre Bestellung wird nach Zahlungs- Schnelle Grafik aus dem Compiler 0.4.M./C 60) “ars 
eingang umgehend zur Auslieferung gebracht. Solar-Painter ra 
Sprite-Editoe (C 64) az 
Zanbor der Farben mit Macsie Painter (ei Ara) 233 
i at dee Bde hir (LLEFCHEWICPT MEN up 
Solte/Anegal Slichwort Titel Salto/ Ausgabe Za am. 
Stichwort Titel t Zelchenrontine fir Kreise und Elipsn As 
Arkloide für Grafiker und (C 60 gurıo 
Aktuelles Eoala Bildlar rum Anlasson L] EreE Nachhall auf Seite 79 in 13,35 
HgAuE Ariga — ein Traumcomputer word Wirklichkeit Era Mit dem . Fenci) 1a 
Artı galesti 14/11 Viol Graubk fir wenig Geld (Graphiss Basic und Spiol Day Huu= des Magins (C 54) Pi 
Dar »Plus'd« ist ondlich da 12/2 + ir GE im Yı E Dashar, der Yolmtefler (L<L.M.JG 64} 7] 
Grundstein einer neuen Linie und kein zweiter PC 13/10 Vorlcht Kamera! (Take 1, Tockfülm Dosigner; 126,8 Nachhali aufGeite 117 in 8,35 
Chaos Der deutsche DL) 1410 Apple I sucht 154,3 Der susende Ralderil 69) 73/3 
DFÜ Eppiler Dr 2 64 Er Contact 6) — Die Software zum Ansom-Kopıslar 142,78 Diamantenbeber (L.d,M Atari 43 Köyte) EP 
Ascom-Koppler jetz such Mur Atır ad Spectrum auf Draht (DFÜ Wi 1248 Kachhall auf Seite 85 in SB 
Ein Anschluß unter di Summer (ailkeorx Nummer) 15343 En Die Abontever einss senden Repores (kerurn'ü 5 El 
in den USA zald 153,10 Gerällkeimer (Atari) 195, 
Mewes DFÜ-Programm für den Spectrum 22,10 Schachmatt per Toleden 154/10 sragd im Schneider (EPG 464) ars 
m zum Anfstecken 1271 Nachkall auf Saita 96 in ES 
Soltwans Atari-Schreiber jest Air 520 ST 14/12 Splelo- Teste Abenterter in Bagdad (Bud Gare 
Software fast zum Muolltarit 101 Amazon. 145/58 Kalte Zeiten (Wintey Scream 64) Ge 
Tume werden wahr Schnsikdler-Neuheiten aus England) la Archon I: Adegt 128,2 a Ba. Kalter ic 20h Gel 
Trucker Mac Inker, der sparsame Drucker larla 144,73 Pit der Apınls auf die Trainerbarnk (Altion Aplabait) 104 
Flopey Goninsdore-Pleppy auf gabmcht 31 Athletic Land 14871 blit dom ; auf Ölsuche BEIE 
Diskttenlaufweck fr don Sharp MZ-DO0 1271 A Wie to a, Ei 169710 Micko mit Tioke(C Ed) Tori 
Cruck Dis — Dio Floppr-Alternative (BISK) 204 Dallblarer 16710 H 72/1 
Erweüinrung Mini-Exrpansion-Box Mir TI SaNLA 11 Boulder 124,2 Nachhall auf Seite E5 in 5/85 Miemandsland (2 64) Tara 
MX Dar Mualewunder (Taraha CK) 142 Bounty Bob striken ak 1,8 Fokerlace für 165 Ebyta Tears 
Der Bilg-25X von Philips EP Ce 1242 Frrcho = die Macht des Geiste: (69) NE 
CrM mit M3E-Compuser: so gaht's MALE Crary Tin 1441 Nachhall auf Seite BI in 1265 
Ein ea Grabe von Phi 19/B Ir 1182 mit dem Joystick Pe zird 
Flotter Irraior (Sanyo, Goldstar und Danoe) aus Dretin ex Machina 1sgd Rettet den letzten Baum (Insekt defenseG 64) Tara 
MEE-Mir us Den bay hie 168712 SAM — der Mann von der Baustelle (u.d.bLSGPRG S6) IT 
Mir dem Beyenden Teppich auf Erfolgelcums 15/16 2 Kovanrzbo 14B/5 SNachhali uf Seite 79 in 105 
Bücher Bücher zur DFÜ 11173 14273 Schatzkähle (Atari BOCKL) TS 
"Bacher zum Denken {ET 12010 LEE hr Yoricht Hochwasser (ArmantorfLueM NGC 6a) Sid 
Eaoktro Froddy 14571 Über den Wolken (Flugplanıng!C 64) Tall 
Flassabarichte Elite IGa/lc Verkuckemel Gpseimum) HE Te) 
Die vonesten Heimcomputer (Winter-TE5 ara Eureka 1444 
Fonkausstellung in Berlin: MX war Trumpf 31] Fahrenheit 461 IMEE Tira& Trick AMFEL — grünes Licht für Atar-Maschinen-Programime IE 
Kanıpf der Kolosse (Ninter-CEE — Teil I} ri Fiveaäide Footkal 188.10 Auf Trap gebracht (CPC 464) T3/12 
SommerZEs 1383; Weiche Welle in Chicago — Teil arB 14078 Bızir heguem (GC 54) Burz 
Kftware-Jackpot (Winter CES — Teil?) BE Frank Brunse Besceug 156/10 Basic-Dompactor aarlo 
in Lemiehen (GW Se] 12-11 Frankie goss to Holreaod 162/10 Nachhall auf Seite Bl in LIES 
EI Einmlichs Intelligere in Wiesbaden (Al Europa) 13712 Fraity Funk 1454 Basie-Flur Applesot-Basie-Erweiareng (Apple Io 36,3 
Musik blidi rd Ghottoblaster Ist Heim C 64 piepat oa oil 
Ghostbastere a3 Bilder ichög konaernieren. OZPG 64) Er 
Ghost Chaser Io i ck für den Commodorm && ol 
David Caro (Ghostbusiars Autor) 11,5 Great American Crses County Road Baco IEBıl Ei) ifter (Spectmam) 31/6 
Intaryiere mit den »Print 14,5 Hackar org Dateien hin- und ” tari Barı 
Teck Tramdel (Chairman Atanı 11.8 HERD. 149,5 Der neues Checksumimer jet da (GC EA EArlo 
Hypar Sports 1 1433 Der neue Checissumumer it die (0 64) ss 
Hard Test 146,4 Drr nous Checssumumer (2 64) Girlz 
Druckar Eewrußt robust (European E 6311 FT} 31,5 Kannedy Approsch 169,12 Sonderzeichen unter CP M(CPG dö4) el 
Lose 143,73 Die Mahabel wird zur Maus gar 
Soltwars-Toste j 1a Hachhall auf Salto #9 in 1155 
Textrerarb, Ein Textprogremm, das sich lohni (Homewaord/C Ed) Fri, Ma=ik- ol te Son 1,3 Disk-Haif für die schnelle Hilfe (Atarı) 18 
Irei Drucker im Test (STE 60, Gemini 10%, CP-30%) 1671 Match Day 1BE Disk und DO5-Uclitr für alle 7/10 
Hachhall auf Seite 148 in 4/85} DWX 305: Schönschrift Minishackew 141,4 Drei Tricks Mir Eh: 
zum Niesdrioneeis 18/2 Mr. Dr 167,10 Ein langes Gesicht fr den C d4 (Londetreen 84} zarıl 
Eins neife Werkindung (EP, EP4, EI I 4 konster Ta 188,10 Fatberkulfe mit HELP & TRAGE (VG 20) 351 
Kompakt und leise: Mattixdrucker (ZLP (Contzenier) ar Kick Faldo plays the Open 189/11 Fonsterkünster (2 69) Fir 
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Titel 


Auf singn Blick: Logo-Belehle 
Belsklserweitorang für BSKIGPG 46) 

GP/M — En Eotriaberyrstorm 

Fenster in die Zukunft Basic auf dem 530 ST 
pielenei dor 


Logc-s 

BSL — Maschinenspusche mit Komfort 
Begriffe abs der DFIT 

eye rap ee schnellen Gloschschei 
Benthoven — Bil für 


De ne Er Foluihäster 
Das Interlace I ROM und seine Nutzung 
Der Gomumaderes 54 kann ginfazh alles 


Aria Spialo Promigare 
‚ten ala: Eures 
Dar © 64 im © 128 
Ein teures Y' EFÜ-Kassen) 
Hemeormputer ans zwegiser Hard 


hlehr als ein Computer (Die CGommsdare Starr} 


Musik mit Fake und Poek/Teiı 


Basteln 
Ara 330 ST auf Abwngen 
Bilder aus dem Wall 


Nie ee 


Jede Menge Software 
Arsehibuh a ne a und Spoctmum 


ah Programme und ihre Preise) 

55 viel Software (Boimaotteare für 

sl& aus dem (Coratrerion Beta) 
Welcher Gorkputer zum W. ’ 
Wettbewarbe 
Aktion Aypılelzalt 
Bildergalerie 
Bildergaberie (kachlese) 
Rithoven-Foastral 
Bihove: 


uch ohne EPROM 


Die Ausgaben 


1355 


6/85, 7/85 und 9/85 
sind bereits vergriffen 
und nicht mehr lieferbar! 





Auch die bisher 
erschienenen Sonderhefte 


können Sie 
jetzt direkt bestellen: 


SONDERHEFT 01/84: SIMCLAIR 
Unentbehrliche Informationen zu den Sinclair 
Computern ZABl und Specirum. 


SONDERHEFT 01/85: SPECTRUM 
Anwendungsbezogene Listings und Tips& Tricks 
für alle Spectrum-Fans. 
SONDERHEFT 02/85: SCHMEIDER 1 
Eine Fülle wertvoller Beiträge und Listings 

| für alle Schneider Anwender. 


| SONDERHEFT 03/85: SPIELE 
chlagewerk für alle Spiele-Fans mit 


SONDERHEFT 04/85: SCHNEIDER 3 

Eine Erweiterung für alle Schneider-Amwender, Super- 
 Programm-Listings und großer EinsteigerTeil. 

SONDERHEFT 05/86: PROGRAMMIERSPRACHEN 


SONDERHEFT 05/86: 68000er 2 
Umfangreicher Listingteil, viele Informationen, Tips 
und Tricks für Anwender der 69000er-Compufer. 


SONDERHEFT 07/86: SCHNEIDER 4 
Mit den Schwerpunkten Joyce und CP/M plus, Rat- 
schlägen zur Vortex-Karte und vielen Tips & Tricks. 


SONDERHEFT O8: COMPUTER ALS HOBBY 








Mit den Schwerpunkten Scnund- und Videodigitalisie- 
rung und Spieleprogrammierung. 


SONDERHEFT 10/86: SCHNEIDER 5 
Der neue Schneider-PÜ wird vorgestellt. Wieder viele 
Hilfestellungen und Kurse. 


SONDERHEFT 11/86: SPIELE-TESTS ö 
Alles über aktuelle Spieletests, Computerprogramme, 
Grafik- und Musik-Software. 


SONDERHEFT 12/86: 68000sr 4 
Ausführliche Testreihe aller Grafikprogramme für 
AtariST, Amiga und Sinclair QL sowie viele Grund- 
Jageninformationen zu diesen Computern. 

| SONDERHEFT 13: SCHNEIDER & 

| Diskeftengrundlagen-Kurs. Reiche Auswahl an Pro- 


grammen für CPC. Schneider CPC oder PC: Fakten 
und Vorteile. 


SONDERHEFT 14: SOFTWARE 
Der Softwareführer 1987 für Ihre optimale 
Programmauswahl. 


SONDERHEFT 15: HARDWARE-TESTHEFT 

















Alles für Umsteiger, Programmierer und 
Assembler-Freaks. 








Tragen Sie die Nummer des gewünschten 
sonderheftes (z.B. 08/85) auf dem Bestellab- 
schnitt der hier eingehefteten Bestell-Zahlkar- 
te ein. 


Am besten gleich 
mitbestellen: 
Die Happy-Computer- 
elta lefe).@S4) 








Für alle Leser, die »Happy 
Computer« regelmäßig 
kaufen, sammeln oder im 
Abonnement beziehen, 
gibt es ein interessantes 
pervice-Ängebot: die Hap- 
py-Computer-Sammelbox! 


Mit dieser Sammelbox 
bringen Sie nicht nur 
Ordnung in Ihre wertvol- 
len Hefte, sondern schaf- 
fen sich gleichzeitig ein 
interessantes und attrakti- 
ves Nachschlagewerk. Ein 
kompletter Jahrgang (12 
Ausgaben) paßt in eine 
der praktischen Sammel- 
boxen! 


Übrigens: Die Sammelbox 
ist nicht nur ein prakti- 
sches Aufbewahrungs- 
mittel: Sie eignet sich 
auch hervorragend als 
Geschenk für Freunde 
und Bekannte zu vielen 
Anlässen. 


Bad: Al 
BaFrB: Al 
BaFEB: BB 
DaB: Ai 
BaABıAi 
BOBB:ı Ai 
B2BB: Al 


Bacı: Ai 
BaDB: Ai 
BRDE: Ai 
Bee: Ai 
BOEB: BO 
BOFB: Ai 
BaFB:E fl 
2188: Al 
BiBB: AS 
B11B:08 
B1llS:Al 
28128: Ai 
Bi28:A1 
2138: 30 
8138:00 
B14B: Al 
B14B: Al 
3150: Ai 
0158:29 
BiöB: Ad 
Bi1öäßB: Al 
B17B: Al 
B17B:AE 
2188: 30 
B188: Ai 
B1FB:rA1 
B1Fe: Al 
BiAB: OB 
B1Ag: BB 
B1B8:1 Al 
B1B8: Al 
B1C2:BB 
B1CB: BU 
BiDd:B4 
B1DB: Al 
BlEB:A1 
BIES: BB 
DBIFB: Bd 
BIiFB:BY 
208: Ai 
Q2B8: Al 
2219: 00 
2218: 08 
B22B0: Ai 
B22B: Al 
2230: Ai 
2B738:80 
2248: 09 
B248: Al 
2238: Al 
B2858: Ai 
B752: 80 
2258:B5 
B27B: Ai 
BZ7BrAl 
BrEB: Al 
2288:B00 
BB: Al 
029781 Al 
BzAB: Ai 
BrAB: A1 
B2BR: 20 
B2BB:ıBE 
BPCH: A? 
BrCcBr Ai 
B2DB: Al 
82D08:808 
B7EB: BO 
BrEB: 09 
BIFB:AZ2 
B2FB8: Ai 
BIDB: B0 
2308: 320 
09312:008 
83185:BB8 
2328: Ai 
0328:00 
23558: 00 
235358: 08 
2340: 20 
2348: Al 
B3538: Ei 
B35B:E1 
0352:08 


23568: 00 | 


2378: Al 
B578:E1 
23sB:E1 


0558: 08 


100 


Pir 


BRREMBRAFN 


Al 


BERRSSNMESESANRBENS 





2392:B8 
335978: Al 
B3AD:EI 
B5AsdıEl 
233B8:Fö 
B3BB8:ıE1 
23CH: Ai 
B3CB: Ai 
28308: F2 
25D83:F8 
B3EB:EI 
DSERB: A1 
BSFO: Ai 
BSFB:A1 
B400:FE 
Bams: Ei 
B41B: Al 
B418: Al 
B420:Al 
Ba2g:rFl 
243B:F4 
9438: Al 
2a 
2448: Al 
8450: Al 
B45B: Al 
B4&B: Al 
B4&B: Al 
B47B: Al 
DB47B: Al 
3480: Ai 
0488: Ai 
3498: Al 
B4FB: Al 
Baht: Al 
D4AB:hi 
B4B8: Ai 
B4B8: Al 
93009: A1 
BACH: Ai 
2400: AF 
94D8: Ai 
D4EB: A1 
B4EB: A1 
BAFB: Ai 
B4F8: 80 
Ba: Al 
2588: Al 
B51B:l 
518: Al 
2520:82 
3578: Al 
85302: Al 
25358: fA1 
er 
2548: 80 
3550: Ai 
758: Al 
BSshrhi 
2568: Al 
0570:58 
3578: Al 
B58B8: Al 
03588: Al 
259: Al 
2578:89 
25a: Al 
Bsadı: Ai 
B5BB: Al 
B5B8: A3 
DSB: Ab 


BScBzAl 


BSD: Ai 
BS5De: Ai 
B5EB:SQ 
BSEB:B2 
BSFB: AI 


BSFBEeAI A} 


Bar Al 
999:88 
Bald: Al 
3618: Al 
B528: Al 
Rb28: Al 
338: 88 
06538: Al 
B54B: Al 
Bade 
ee Fe 
9658: BD 
Ahr Al 
Buhl 
BA7B: AI 
B578: Al 
BE: 
Basel 
B6r: Al 





BsFB: Al 
BaABı hi 
Band: 89 
Böbd:fAi 
B&sBe: Al 
BC: Ai 
DBECB: Al 
BAD8:80 
B&aDB: Al 
BER: Ai 
BSEB: Al 
DarB: AZ 
B6F8: 59 
Br’aR: Ai 
areas: Al 
3718: Al 
3718:88 
2728:98 
D728:A1 
B73B: Al 
Br738: Al 
2742: 80 
8748:80 
37350: A1 
27358: Al 
B7’auß: Ai 
23748: B0 
29778:88 
B77BzAl 
Br7eB: Ai 
B7BB8: Al 
3770:50 
a793:88 
Br’AaRB:Al 
Br’AgB:Al 
27Ba: Al 
D7B8: 80 
2B7C3:88 
B7CB: Al 
B7’Da: Al 
Br’De: Al 
B7EB:AC 
D7ES:ı SO 
B7FB:Ai 
B7FB: Ai 
B8BR: Ai 
Base: Ai 
23818:58 
galB: Al 
BB: Al 
2828: Al 


2838: Al 


2333B:88 
2548: A1 
28348: Al 
2852: Ai 
2858: Ai 
0950:80 
B35B: Al 
BE78: Al 
B878: Al 
BaBB: Al 
2888: 58 
B3FR: Al 
BBFB: Al 
BBAB: Al 
BBAB: Al 
BBBB: 80 
B2aB8: Ai 
BSCH: Ai 
BBCcHB: Al 
BBSDB: Al 
B808:88 
BBSEB: Al 
BBSEB: Al 
BErg:Ai 
BöOFB: Al 
BDA: 
BrBB: Al 
Br1B: Ai 
3718: Al 
B9208: Ai 
2928: 00 
09738: Ai 
Br3B:A1 
2748: Ai 
nF748: Al 
23958: 00 
95a: Al 
ee 
Br&B: Al 
BIF7B: Ai 
AYF7E: BB 
BIB0: Al 
B7BB: Al 
BB: Al 
2998: Al 











DFAS:AL 
BFBB: Al 
BFBB: Ai 
BYCH: Al 
BFCB: DO 


BODB: Ai 
BFrDB: Al 
DIEB: Al 
BIEB: Al 
DFB: 29 
BFFB:Al 
Bag: Ai 
BABBr Al 
BAIB: Ai 
BALB:BB 


Frogrammname :BILD@G2.DAT 

Länge :2815 Bytes 

Beam Al Al Al AB EI B2 
BBZBB: Al Al Al Al Al AL Al 
Ball: Ai Al Al Al Ai Al Al 
Bais:Al Al Al Al BA B& Al 
BeazB:A1l Al Al Al Al Al Al 
BazB:Al Al Al AL AFEI AZ 
BazB:hi Al Al Al Al Al Al 
BasB:Al Al AB AZ Al Al fl 
Das: BB AD Al Al BA BA Ai 
BasB: Ai Al Al Al Al Al Al 
BasB:Al Al Al Al AZ EI 88 
255: Ai Al Al Al AS AD AE 
Ba&B: AZ BE AD BB AD AD AE 
294,5: Da AD BF BA Bd BB 
2970:30 BF Ai Al Al Al Al 
Bara:Al Al AS AD BO Ei 808 
Bossa: Al Al Al AS Da Do Ba 
Das: BB DA Da ad Da am 
2072: 0 Ba A Bam BA BB BO 
Base: Ba Be AZ AL Ai Al. Al 
Bad: AB Ba BE Bi EI BO 
Bhcehi Ai AZ Da Do Ba DB 
BEaBG:ı DR DO DO Ba Da Ba Be 
BBBB:EO DO Ba Bm BA BR Rd 
Baca:oa Ba Ab Al Ai Al Ai 
BacB:Al Al A7 BB Bd Ei Ba 
DaDB:A2 AT Ba Da Da Ba DB 
BaDs: Bd Ba 20 BE BA BS A? 
BOER:BD DO BA BB BA BE BB 
BOEB:BB BG BF Al Al Al Al 
BAFB:ıAI Al AD BO BB Ei Da 
DBRAFE:DO DE GO Ba Ba na Da 
Biaa:Ba BE B# B5 Al Al Ai 
Bi0E:00 BO BB Bi BA EB Bi 
B11lB:BO BB B2 Al Al Al Al 
BılB:Al Al A7 Ba BE EI BG 
21780:29 Do 2a Ba Da na Da 
n128:B4 B5 Al Al Al Al Ai 
21328: B20 De 29 Ba BA EB Bd 
2138:B0 aa B2 Al Al Al Al 
B14B: Al Al Al A?’ BE Ei Bi 
0148:00 DO oo Da md Da Ba 
BiSB:A1l Al Al Al Al Al Al 
B1i58s:DE BO DO BD BA SB Bi 
D1l2B:BO BB 89 Ai Ai Al Al 
Bi&öB: Al Al Al Al FB EI Ei 
Bi7B:E1 Ei Ei Ei Ei Ei Ei 
B17B:Al Al Al Al Al Al Al 
2150:20 DE BR BB BA BB BR 
B188:09 aa BR Al Al Al Al 
B198:Al Al Al Al FB EI El 
Bi9S:El1 Eli Ei Ei Ei Ei El 
BiAB:Ail Al Al Al Al Al Al 
B1iA2B:00 DO BR Ad Sa BE 50 
B1iBB:20 BB A& Al Al Al Al 
BiBs: Al Al Al Al Fi EI EI 
BiCB:E1 Ei FS F3 Fi Ei El 
B1C3:Al Al Al Al Al Al Al 
BIDGB:E2 B4+ Da Ri Bi D4 B4 
B1D8s:B4 EZ BZ Al Al Al Al 
B1iEB:A1l Al Al Al FB EI Ei 
BlEB:F?7 F3 FS Al FB FS F3 
BiFB:Al Al Al Al Al Al Al 
BiFa:Al A?’ Da Do Da Da GO 
BB: BB Al Al Al Al Al 
228B:A1l Al Al Al FE Ei Ei 
B21ia:F5 Al Al Al Al Al A3 
B218:BF Al Al Al Al Al Al 
B22B:A1l Al B5S AA AA AB Ak 
B22B:A6& Al Al Al Al Al Al 
B>3B:Al Al Al Al FSEI Ei 
B238:Al Al BB AE AS AE 88 
2248:898 AD AD AZ Al Al Al 
B24B: Al Al Al Al Al Al Al 








BAZB: Ai 


DAZB:Al ı 


BASB: Ai 
BASE: Ai 
DBA4B:D4 
BA4+B: Al 
BAD: AI 
Base: Al 
BAR: Al 
BAsB:B4 
nA7B:Al 
BA7B: Al 
BABO: Al 
Base: Ai 
NAFD:D4 
BAFB:Al 


2750: Al 
0258: Ai 
D>4B:B3 
0758: 99 
B27B: Al 
D778: AE 
2288: Ai 
D7BB8: 30 
92709:08 
B2FB: Al 
DAB: 
BrAB: Al 
BPEB:Ei 
BZBB:F& 
DZCH: AE 
B7rca: 00 
2209: Al 
2e7Ds:E1i 
BZEB:FS 
BZEBS:08 
B2F0:598 
BPFB: Al 
2300: FB 
B30B:F7 
2310:09 
8318: AB 
B352B: Al 
0328: FB 
2330:F5 
23358: BO 
2340: A1l 
2548: Al 
0350:A1 
2358: F3 
25650: B5 
3568: Al 
2378: Al 
2378: Al 
B38B: Al 
93838: Al 
Br: Ai 
B3F8: Al 
BSAB: AI 
aSAB: Al 
23B8: Ai 
B3BB: Al 
B3CB: Ai 
B3CB: Al 
235DR: Ai 
B3Das: Al 
BFERB: A1 
BI3EB: Al 
B3FB: Ai 
BSFB: Al 
Areal 
24988:07 
2418: Al 
B418: Al 
D420: Ai 
0428: Ai 
2430: Al 
0438: Ai 
El 
B442:Al 
9450: AD 
2458: B7 
Bär 
naeh 
2470: Ai 
B478:&hF 
9460: 09 
B488: Ai 
2490: Al 
B498r Al 
9440:B8 
Bang: 80 
D4B0: Ai 


DAAB:A1 
BAAB:nAl 
BABB: A1 
BABS: 809 
DACH: Ai 
BACH: Al 
BADg: Ai 
BADS: Al 
DBAEB: BO 
BAEB: Al 
DAFB: 72 
BAFB:DO 
DEDR: Da 


24B8: Ai 
B4CQ9: Al 
24C8:88 
2409: 80 
n4DBr Al 
B4EB: Ai 
D4EB:A1 
B4FB: 90 
BAFS: SE 
e52nB: Al 
a5: Al 
2518: Ai 
BeSiBrBn 
2528:B5 
0528: Al 
25358: Al 
5538: Al 
B542:B0 
25348: Al 
2558: Al 
Bs5s:Al 
2B565hl 
9548:88 
B57B: Al 
2578: Ai 
0580: Al 
D5Bd: Al 
23598:&C 
B59Bel 
Bahn: 
Bad: Al 
B5B0: Ai 
BS5B8:ıB3 
B5C8: Ai 
B35CB8: Al 
2502: A1 
BSDB: Ai 
DBSEB:A1 
BSEBEAl 
BSFB: Al 
BSFB8: Al 
0500: Ai 
Bel 
251: Ai 
BälB:Ail 
D42B: Al 
B52B: Al 
wi 
BA3B: Al 
As54:Al 
0648: Ai 
BASDB:ı Al 
2658: Al 
Bas: Ai 
nähhrhi 
BE7R:Al 
DAB: Al 
Bas: Al 
2688: Al 
Bar Al 
BArBAl 
Bart: Ai 
GAAB: BF 
2B4B8: Ai 
DSBB: Al 
Bl: Al 
DECB: Al 
BADd: Sb 
Babe: Al 
BGERB: AI 
DBEEB: Al 
DFB: AS 
BAFBEr:SQ 
DB7B0: BF 
BrBBrAil 


Ai 
Al 


Al 
Al 


»Level 3« (Anfang) 








05> 
<FA> 
<2F> 
xDa> 
<ES> 
<1D> 
<B2> 
«F4> 
<BD> 
<«B3> 
<EB> 
<cC> 
“94 > 
<B5> 
IC» 
<B4> 
<a&> 
“31> 
“1A> 
64> 
<öc> 
<B9> 
<b2> 
<Cc3> 
<4B> 
332 
<E9> 
<1A> 
<ZB> 
33> 
<1B> 
xDB> 
<F1> 
<FS> 
<FB> 
<ES3> 
ı27> 
<13> 
<5B> 
“453> 
<Ch> 
“747 
<AF> 
<Aal> 
<BY} 
<Di> 
“3A> 
“B2> 
<aA> 
<72> 
<An> 
“20> 
<7D> 
<932> 
<C9F> 
<C1> 
<4D> 
<“58> 
<27> 
<21> 
377 
<B> 
<c3> 
<Bi1> 
<19> 
<«F1> 
<B8> 
<CcE> 
<F9F> 
s11> 
<A97> 
77? 
<DD> 
<A5> 
<A7> 


101 


2718: Ai 
5718:&B 
2B728:B8 
2728:88 


8738: Al ı 


2Br73B8:Al 
2748:50 
2748:80 
27598:58 
ar7S5B: Al 
B7&B: Al 
B768: Bi 
2770:808 
2778:809 
Br7’eaB: Ai 
B788:A1 
079780:B8 
27978: B4 
27AB:58 
Br’Ag:Al 
D7’Ba: Ai 
87B8:A7 
B7CB: Ai 
DB7C8:A7 
B7’DR: Ai 
er7De: Ai 
B7’EB:AIL 
DB7EB:AI 
B7FB:A1 
B7FB:Al 
BBRB: Ai 
BBDB: Al 
BB1B: Ai 
B818: Al 
2828: Al 
Bere: Ai 
B938: Al 
Ba3B8:A1 
nBS40: Ai 
2348: A1l 
2958: Al 
2858: Ai 
29508: Al 


FProgrammname :BILDB3.DAT 
:2B15 Bytes 


MM EEE EEE BEE HE «EEG EVER BEE SE EEE gs = EEE ge Sg = BGG SE DE Na EEG 


Länge 


DBOR: Ab 
Boos: Ei 
2818:08 
B@183: AB 
2028:B5 
Ba2B:A1 
BaSB:Al 
2038: B0 
Ba40: Ai 
2043: A1 
BB52:21 
BaSB:21 
Bas: Bil 
DaB: 
2970:30 
Ba7B: Al 
BOBB: Ai 
Ads: Al 
BErR: Al 
BaF78:80 
Bag: Al 
BaAB: Al 
DaBB: Al 
BRBB: Al 
Boca: 80 
BOCB: Al 
BDO: AE 
ZBaDE: A3 
BBEO: Al 
DOES: 88 
BarG: Al 
BOrFB: 80 
9188: A7 
B1BE: AD 
B110:88 
8118:21 
D120: 02 
0128:7D 
2138: 08 


8138: 2A ! 


0149:21 
2148:00 
2150: B9 
2158:200 
B1&8:21 
B1&8:21 


102 


BB&B: Al 
23870:Ai 
2878: AE 
2898: A2 
B888:A2 
B87B: AD 
B8r78: Al 
BEADB:BR 
BeAB: ad 
B8BB:50 
B8B8:80 
BecB: Ai 
BaCBı 5A 
25D8:&5E 
BSD8:&c 
BBER: SA 
BBEB: A1 
O8FB:88 
BEeFB: BR 
BrBB: DO 
097285:80 
Br1B: Ai 


2718:B5 | 


29728: A5 
Dr2B: AA 
29730:B5 
2938: Al 
9740: Al 
Bra 
D95B: Ai 
nF58:Al 
Braß: Ai 
DFB: Al 
Br7B: Al 
BFrF7B: Al 
DI8B: Ai 
BFB8:Al 
BB: Al 
ArFgB: Al 
BAD: A1 
BaAg: Al 
BFBB;: AI 
OFBB: Al 


B170:26 
B8178:080 
B188:08 
B1i88: 21 
B178:21 
2B198:21 
Bla: m 
BiAB: >31 
B1BB:21 
8158: 21 


B1Cd:2D © 


BICEB:BD 
3108: 55 
B1De:721 
B1LEB: A? 
D1ES:SO 
BiFd:Di 
BiFs:Al 
2782: Al 
B2REB: Al 
232180:88 
2218: Ad 
22208: Al 
Bz28: AE 
2230: Al 
2238:89 
D740: AD 
0248: Al 
025B: 80 
22358: Al 
2235B:89 
0258:88 
B27B: AE 
2278:88 
27808: Al 
0238:889 
2292: 80 
2278:88 
B2A2Q: 80 
Bas: Ai 
BZBB: Ai 
22B8: 80 
02C0:88 
B2C8:89 
B7DR: Ai 
BrDB: Al 
BED: 88 
BREB:ED 
B2ZFB:88 


83333555 83888387 


[eu 
= 





BFCB: Al 
BFCB:Al 
2708: Ai 
B7Da:Al 
BIEB:A1 
BFESB:A1 
BIFRBEAL 
BOFB:A1 
DABRE Al 
DAB: AD 
DA1B:A1 
BALB: Al 
DdrAl 
BA>2B: Al 
BAD: BR 
2A38:B8 
BA4g: Al 
BA4B: A1 
BASB:A1 
BASE: BB 
BAsd: DB 
Basel 
BA7TB:A1 
BAFBeAl 
BABB: BO 
BABS: DU 
BAFB: Ai 
BAFB: Al 
Brad: Ai 
BAAB: BE 
DAB: DO 
DABS: Al 
BAcB:Ai 
BACH: Al 
BAD: AB 
BADS: BB 
BREB:AIl 
BAEB: Al 
BAFB:E2 
BAFS: BB 
DBOB: 002 


BSR: Al 
8388: AC 
23128:858 
B31B:A7 
2328: A1 
D328: Al 
D538:A7F 
2338:80 
B3540:A?7 
2348: Al 
2358: A1l 
2558: Al 
BISAB:Ei 
Dar 
B370: Al 
28378: Al 
03808: A1 
DFBB:E1 
2398: A8 
2398: Al 
BAR: Ai 
B3AB:FI | 
23B8:ıF7 
B3E83: A? 
DICH: Ai 
B3C8: Al 
2B3D8: Ai 
235D8: A1 
BIER: AS 
BSER: AI 
BSFO:AZ 
BSF8: Ai 
DaB: Ai 
Dam: A7 
B41B: Ai 
23418:B0 
9420: Al 
0429: AD 
2430: A53 
8438: Al 
2440: 00 
9448: A2 
2450:B4 
0458:89 
2450: Ai 
0453: 5089 
23470: BD 
0478:B2 
D450:80 
D488: Ai 











2470: 00 
B4FS:EF 
24:2 
B4AB: BO 
P4EB: AL 
B4BB:B4 
BA4CB: DU 
2403: BG 
2408: A7 
B4DB: Al 
B4EB:ED 
DB4ERB:F& 
B4FR: BB 
arg: Ag 
nsanm: Al 
Sag: ga 
3518: %A3 
2518: 00 
2522: AF 
3528: Ai 


BI>SB:BE | 


25358: 20 
B540:A7 
48:7 
DS50:A1 
et ste 
B56B: ACc 
B5&5B:r Al 
D57B:A5F 
2578: Al 
nSed:Bz 
2538:A43 
BS59B: Al 
n5rs: AH 
et 
BSAs: Al 
BS5BO: 00 
25B8:Al 
DB5CH: AB 
2568: Al 
BSDR: Ai 
B5D08:008 
B5EB:A1 
BSEB: Ag 
BSFB: Ai 
DSFBEA2 
u er] 
BB: Al 
25180: #3 
D518:Al 
DBarB: Ah 
B&28:Bi 
DB: Al 
25385:80 
D&4B: Al 
u 
Ban: Ad 
Bö55dhl 
Daäm:Bn 
Dahl 
BA7B: A 
B578:B2 
2530: A2 
0588:88 
BEIM: AI 


04F78:B2 


BEnd: AZ 
Dana: BR 
26&B0:58 
B&Bs: Al 


Programmname :BILDB4. DAT 
ı791&5 Bytes 


Dad: BC 
Bags: Al 
BB1B: Ai 
BaiB:Ai 
Dazu: Al 
BB28:B8C 
Baa:al 
Ba38: Al 
Da: Ai 
2048: A1 
02358:8C 
BaSB: Ai 
Basel 
BO: Al 
9378: 58 
Ba7E:SC 
BasR: Ai 
BBERB:A1 
BaFB: Al 





url 





BECH:ED 
BSCH:EB 
BEDB: Ab 
BAD: 28 
BHERB: AI 
BSEB: Ab 
BEFBrAl 
B5FB: BF 
0788:50 
2738: Al 


B710:B2 ı 


B718: Al 
D72B:BA 
B728:80 
B7308: Al 
B73B: Ai 
20748: A? 
09746:89 
2750: Ab 
0758: Al 
2750: B2 
B7EB: Al 
2770:89 
29778: AE 
2788: Ai 
2788: A2 
27702: Al 
B7r&8:B0 
B7AB: Ad 
B7ABEAl 
2B7Ba:B2 
D7BB: A2 
B’CB: A& 
B7’CB: Ai 
DB7’DB: Ai 
B7DB:A?Z 
D7EB: 88 
D7EBE AI 
B7FB: Ai 
Br’FB: Al 
DB: Ah 
Bas: 50 
Bsil: AD 
BEIB: AD 
D820:A1 
B827B8:B? 
09330:809 
BB3B:EC 
28409: 88 
2948: 04 
2850:07 
DB58: AC 
BBsR: 80 
2858: 09 
23570: Al 
2878:B2 
BB8B: E1 
BEBA:El 
B9F7B2: DB 
BEFrB: Al 
DBABE A? 
DSAB:El 
BBBB: Ei 
BEBE: O0 
BecB: A? 
BeCcB:B4 
BEDG:Fi 
Babe: FS 
BBSEUB: DO 
BIEB: Al 


A278: 20 
BA: BC 
DAB: A1 
DBBU: Ai 
DBBB: Ai 
DaACcB: a 
BaCB: Ai 
DRDEB: Ai 
BaDB:A1 
BOED:A1 
BOEBS: BU 
DEOFB: Al 
BarFS: Al 
B1BA: Ai 
B1B8:Ai 
B110:A7 
B118:A1 
B128:A1 
B1i78:Al 
231358: Al 


B1F3B8:Al ı 
2148: Ai 


Bi4ö:Al 


Ai 





BBSFB: Ad 
BSFO: Al 
BIBB: AZ 
BODE:FF 
2918: Ai 
2718:BZ 
BI2B: Al 
DY2E8:. 09 
29732: 80 
2938: Al 
239740:B7 
239748: A7 
239509: 20 
2958: BU 
BI5B: Al 
0948: B8 
29772:BB 
D9778:08 
9789:D08 
BraB: Ai 
9970: 00 
8995: 99 
DAB: Ah 
BIAB: OR 
DBFBB: Ai 
27B2:50 
BICR: BO 
B9CB:B3 
2708: 08 
BoDe: Al 
BIER: OB 
BIEB: BDO 
DIFB: BO 
NFFB: BA 
BABB: AI 
DABe: me 
BAIiB:FA 
BAIS: BO 
BA2B: 0 
BA2B: Al 
2538: 80 
gA3B:R8 
BAD: BD 
DAB: dt 
BASFB:ATF 
BASS: BO 
Babe 
BASS: FA 
BAT: AS 
DBATB: AF 
BASD: BB 
OnB88:BS5 
BAD: BD 
BAFS: 21 
BARAB:AL 
DAAS: BZ 
BABS: Al 
BABB: AS 
BACH: A1 
DACH: AI 
BADO:BS 
BADSe Ai 
BAER: AI 
BAEB: AI 
BAFO:12 
DAFB: DO 
BBRAM: BR 


Da BB 
Ba 5 
AZ AB 
A? BB 
AZ Ai 
Ba FF 
Da a 
Ba AD 
A3 0 
Ba BF 
23 80 
A7 FF 


NEBBEHBSBSSBELUN.ED 
NNABSEESBSSBJRERASE 


AB Ba 


»Level 4« 


8158: Al 
28153:A3 
BiäsB: Ai 
B1&B:Ail 
BiF7BrAl 
2178: Al 
B150:080 
Bi8BrA1 
BiFg:Al 
3198: A1 
ZB1AB: Al 
B1ıAs: Ba 
B1BB: Al 
B1iBä:A1 
B1CB: Ai 


Billa: Al 


21D9:39 
BiDSrAil 
BIEB: Ai 
BIEB:A2 
BIFO:A1 
B1iF8:00 


»Level 5« (Ar 





Ai 
| 28 
Al 


SC { 


Al 
Ai 
Da 
Al 
55 
Al 
Ai 
21] 
Al 
88 
Ai 
Ai 
nö 


A7 


A1ı A 


88 
Ai 
Ai 
A 


2 A 
fang 


) 





B28B8: Ai 
BzBB: Ai 
0218:88 
B218: Al 
0228: 89 
B228: Al 
B2358: Al 


B238:88 | 


nm: hl 
0248:82 
B27S50: Al 
B258: Al 
2258:58 
D2aBE Al 
8770:58 
Br7B:Ail 
BzBB: Ai 
B288:80 
DFB: Ai 
2272: 200 
BZAB: Ai 
BZAB:Al 
BZEBB: A7 
B2BB: Al 
BZCB: 4A 


B2ZCBr Al 


B2DB: Ai 
BrDB: Al 
PZEB: Al 
BZEB: BO 
BaFB: Al 
DZFE: Al 
2320: A2 
DSB: Ai 
823310: B8 
8318: AD 
BB 
2328: 00 
9332: AD 
2338:80 
2342: 09 
2348: Al 
23508: B8 
8359:00 
DIsd: be 
0558: 00 
2372: Ai 
2378: 22 
2590: 00 
0358: &D 
2378:00 
578: Al 
BEA: BD 
BIAd: Be 
B3B0O:&E 
23B8: 09 
B3CH: Ai 
BIC8: 80 
03502: 80 
353D8:5F 
DIER: BO 
B3ZEB:A1 
BSFO: Oi 
BSFE:A7 
B400: hf 
BB: Ab 
9410: Ai 
8418:00 
9420: Al 
9428:&5B 
D430: A2 
n458:A1 


B440:80 


2448: A2 
2450: &C 
2458: 80 
0440: Ai 
3455: 80 
2470:50 
2478:&D 
n4E0: 50 
B43B8r Al 
0490:80 
2498: 80 
B4AB:28 
BAABı: Ab 
B4BG: Ai 
3B4BB8:659 


BAC0:92 


B4CB: Al 
BaDbB: Ai 
BaDB: Al 
B4EB:D4 
BDB4EB:B4 
DBAFD: AS 
BAFS: Al 


BSBB:E AI 


104 


BSSRSERRANSBFAFrSPIBRERSBRERBORSFENH-BrBOrSENDr 


E- 


SSENABSE 


Al 


0 80 


38 





B528:02 
B510:20 
2518:1A7 
asz:hl 
8528: A1 
2530:88 
2558:02 
2540: Ai 
9548: Al 
9558: Ai 
2559: 00 
25509:580 
0558:A2 
BSTB:E?2 
0578: Al 
2B598:88 
0588:8589 
25909:80 
MSrB: AD 
B5AB: Al 
D5h: 
25B9:84 
DSB2: 80 
25C0:50 
B5CB: Ai 
25DbB: 50 
B5D8:88 
BS5ERB:BO 
BSEB:BD 
BSFB: Ai 
BSF8:80 
BAa0O: 80 
DB&sBEB:B 
2B518:&C 
B&lB:Al 
n428:01 
06&78:80 
2430: 80 
2558: 50 
B548: Ai 
9548:02 
2458: 22 
0658:&D 
24509:80 
25h 
236479:50 
2578:B09 
2480:88 
B6B5:hr 
BErB: Ai 
24FB: 
BAD: SD 
Band: 
B64B0:50 
BöBß: Ai 
BACDH:BO 
Bach: Ad 
D&D: 
BADB: 508 
DEEB:A1 
BSEB: BA 
DBAFB: Al 
BhFE:80 
D790:808 
B7BB:A1l 
2D718:8C 
8718:8C 
2728: 8C 
B728:BC 
2738: Ai 
0738:68C 
n17429:8C 
0D748:5C 
2750: BC 
D7SsB:Al 
2768:5C 
27659:80 
Br’rB: Al 
DB778:Al 
DB7eB: Al 
B788:5C 
27970:02 
D79B: Al 
B7AB:A1 
B7’AgB: Al 
B’BB:SC 
B7BES:BC 
B’CB: Al 
DB7’CB: Al 
B7D8B: Ai 
B7DE:LSC 
DB7EB: BC 
D7EB:ıAIl 
B7FO: Ai 
BFFB: AI 
BER: Ai 
B898:A8B 


Sc 


80 


92 


BC 


Al 





Sc 


20 


na 


88 


= 1] 


a0 


[1 
= 


BnumANnDAnnE 


Ieb je 


BBBRERERBRZR 


an» 


BrEHNMSB-OSENNPBERSBUSB 


RASESERSSESH 


2818: Ai 
BBaiB:r Al 
2828: A1 
a3z8: Al 
2850: Ai 
B83B: Ai 
2948: A1 
2848: A1 
BB: Al 
B85Brfhl 
2858: Al 
BB: hl 
2870: Ai 
BB7B: Ai 
29808: Ai 
2888: Al 
BBErB: Al 
BBFrB: Al 
BaRrB: Al 
BBAS: Al 
B8BD: A2 
BBBRB: Al 
Bach: Al 
BBSCcB: Al 
28D9: Ai 
BSDe: 80 


BBEB:AL | 


BBEB: Ai 
DaFB: Al 
Bars: Al 
BIBB: SE 
BIBB: Al 
2918: Ai 
BI1B: Al 


BF2B: AI ı 


2928: B0 
Dr3B: Ai 
BFFBr Al 
Br: Ai 
BF4B: Al 
237508: 09 
9958: Al 
BAR: Al 
Bröß: Al 
BF7B: Al 
Do78: 00 
BER: A1 
B9B8: Al 
BIFB:AIL 
27978: Al 
BAD: BD 
DAB: A1 
ASBR: Al 
BFBB: Al 
BercH: Al 
NICH: Ab 
BFDR: Ai 
BFDB:A1 
DIEB: Al 
BIEB: A1 
BFFB:AI 
BOFB: Al 
BAR: Ai 
DABB: Al 
BAID:&SD 
QA18:54B 
BAZD: Al 
BAZB: Al 
et, 
BASS: Al 
nee 
BAaBeAl 
DAB: Al 
BASsB:Al 
DAsR: AZ 
BAsB:Al 
BAFB: AI 
BA7B:AI 
DAS: Al 
BASE: BO 
BAFB:A1 
DAFA: Al 


BAABzAIl 


BAAB: Al 
BrB2:B0 
nABBS: Al 
DACH: Ai 
BACH: Al 
BAD: Ai 
BADgS: BO 
BAER: Ai 
BAEB: A1 
BAFO:FO 
BAFS: BO 
2B90:D00 





4 





<A? 
<DD> 
“95? 
<BE> 
<EF> 
x 7E> 
<7&> 
<öE> 
<b2> 
<CH> 
<D5> 
<cD> 
<45> 
«35D> 
<Di1> 
<2D> 
*25> 


. <5D> 


<15> 
<57> 
<BD> 
<FD> 
<F5> 
<ED> 
<FA> 
<AD> 
<55> 
<4D> 
<c5> 
<AB> 
<24> 
“AS> 
<AB> 


. sD3> 


<A2> 
<c2> 
3C> 
<74> 
<7C> 
x66> 
<358> 
<04> 
“DB> 
<Cc3> 
sAE> 
<DB> 
x3B> 
235> 
<2B> 
“32> 
<BC> 
<D5> 
<BB> 
xıF3> 
<rFE> 
<öl> 
<EB> 
<135> 
<5B> 
“a7> 
<CcB> 
<B3> 
<AF> 
38> 
sas> 
*D5> 
<BA> 
<B2> 
SPA> 
<Cc2> 
<AA> 
<56> 
x7A> 
x92> 
te 
<Cc1> 
“377 
<31> 
z2B> 
ıa2> 
597 > 
51> 
<2B9> 
<ö4> 
11> 
<F1> 
<EP> 
<El> 
xFE> 
<E2> 
<4F> 
<Al> 
<B4> 
<Bc> 
“16> 








Messerscharfe Logik und ein gutes Vorstellungs- 
vermögen sind die Voraussetzung, um unser 
Denkspiel für zwei zu meistern. 


s istspäter Abend. Die Straßen sind leer, nur in einem 
e einzelnen Haus am Stadtrand sitzen noch zwei Men- 
schen in einem Raum, der in schummriges Licht 
getauchtist. Diese beiden Ätarianer haben sich intensiv mit 
unserem Denk- und Strategiespiel »Stratfield« beschäftigt. 

Es geht darum, drei Felder in einer Reihe mit Hilfe be- 
weglicher Kugeln in »seiner« Farbe einzufärben. Dabei ist 
man aber nicht auf eine Ebene beschränkt. Die Felder kön- 
nen auch untereinander auf verschiedenen Ebenen liegen. 
Diagonale Reihen sind nicht erlaubt. 

Sie können Stratfield in zwei Varianten spielen, die Sie 
vor Spielbeginn einstellen. Bei der ersten Art hat jeder 
Spieler zwei Kugeln: Spieler 1 die roten, Spieler 2 die wei- 
Ben. Sie müssen sich genau merken, welche Kugel Num- 
mer 1 und welche Nummer 2 ist, da es während des Spiels 
nicht angezeigt wird, und Sie vor jedem Zug angeben, wel- 
che Kugel Sie bewegen wollen. In der Ausgangsstellung ist 
die vordere Kugel die Kugel 1. Wenn Sie Variante 2 gewählt 
haben, wird das Spiel noch vertrackter. Hier hat nicht jeder 
Spieler eine zweite Kugel, es gibt statt dessen eine Zusatz- 
kugel, die beide Spieler steuern können. Die Zusatzkugel 
hat für beide Spieler die Nummer 2. 

Gezogen wird abwechselnd, die Züge können Sie nicht 
zurücknehmen. Die Ebenen wechseln Sie durch die Tasten 
<P> (hinauf) und <;> (hinunter). Auf der Ebene bewe- 
gen Sie die Kugel mit den Cursor-Tasten (ohne 
<CONTROL>). 

Wie wird Stratfield gespielt? Wenn Sie mit einer Kugel 
zum ersten Mal auf ein Feld kommen, wird es für Sie reser- 





18 REM #%*# STRATFIELD ###r <HH> 
20 REM ##* WRITTEN BY ##+* SEX> 
38 REM #== TH.TENNERT ##+# <KZ> 
40 REM ### (cc) 1987 ur <cF> 
sd — <2A> 
|&8 ECLR :POKE 557,8 <J0> 
78 EXEC DECLÄRE <YV> 
Ba IF PEEKt4BFIHB)I<>FA4 THEN EXEC CHSET <25> 
298 EXEC TITEL:POKE 559,62 <EI> 
180 EXEE SOUND <UC?> 
i11Q@ EXEC DIF <HI> 
ı20 IF 0=2 xPR> 
138 CO=8: 1I0=2:P0=1298: PK0=53249: PMO=B: EX 
EC STARTKO_2 <BV> 
149 ELSE <ÄV > 
158 C0=36: 10=4:P0=17972:ı PKO=-5S3251:EXEC ST 
ARTKO <J0> 
148 ENDIF <rCc> 
ı7B0 EXEC GRAFIK <rA> 


188 POKE 53277,3:P0OKE 825,1:POKE 731,255 <6B> 
198 POKE 712,8:POKE 712,4:F0OKE 787,18B:P 


| OKE 788,148 <xGL> 

288 EXEC INIT cs? 
2108 EXEC FMBAU <MC> 
228 REPEAT <DB> 
230 EXEC SPWÄHL sJF?> 
248 YEACII=YE:XALTDI=X: YA(CII=YıXStI)=XF:Y 
S{I)J=YF=XCAtTI=XC: YCACDI=YC <NC> 
258 EXEC GEWINNER <A0> 
248 UNTIL G=1 <JH> 

| 278 EXEC WERTUNG sHL> 
250 EXEC SOUND sUT> 
299 RUN SFA> 
sed — <sJE> 
>18 PROC TAST 





| Datenträger: 








Ein Kampf in drei Dimensionen 


viert. Erst wenn Sie es zum zweiten Mal besetzen, wird es 
in Ihrer Farbe eingefärbt. Der Gegner kann die Felder aber 
auf dem gleichen Weg wieder umfärben. 
Das Programm istin Turbo Basic geschrieben. Zum Spie- 
len empfiehlt sich ein Farbmonitor. 
(Thomas Tennert/gn/hf) 





Diskette, Kassette | 


S2B VESYEALTI :X=XACTI Es Y=VYACTDI X F=X5 (I)eY 


F=YSLI)sYE=YEALT) :XC=XCAtT):PLP=D <DB> 
338 REPEAT <DE> 
348 GET T <DO> 
sad UNTIL T=82 OR T=57 OR T=-45 OR T=ö61 0 
R T=43 OR T=42 <PBb> 
368 FOR Z=1 TD 88 STEP 2:50UND 9,50+7,10 
„S:NEXT Z:SDUND 9,08,8,0 <5B> 
>70 IF T=38B AND YE>1 THEN YE=YE-1:Y=Y-48 
ıVYESYC-6: XC=iCc-5: X=X-408: PLP=1 SET» 
SB IF T=5%9 AND YE<S THEN YESYE+1:Y=Y+4B 
:YE=SYC+ä: XC=iC+9: X=X+40: PLP=1 <Ha> 
3S08 IF T=45 AND YF>1 THEN YF=YF-1:Y=-Y-16 
:X=X+1&4: YE=eYlc-2: XC=XC#Z: PLP=1 <DG> 
“#290 IF T=41 AND YF<S5 THEN YF=YF+1:Y=Y+1ö 
: X=X-16: YE=YCl+2: XC=XCc-2:PLP=i1 <AL> 
418 IF T=43 AND XF>1 THEN XF=XF-1:X=X-16 
: XC=/iCc-2:PLF=i “AI> 
428 IF T=42 AND XF<S3 THEN XF=XF+1:X=X+1& 
: XC=-XiC+H2:PLP=1 <RBE> 
438 IF FLP=1i THEN EXEC PLPOSPRUEF <LH> 
449 ENDPROC <KD> 
450 —— <JP> 
468 PROC TAST_2 <HA> 
4780 IF T=88 THEN YE=YE+1:Y-Y+48B: YC=YC+ö: 
XC=XKC+5: X=X+40 <ES> 
480 IF T=59 THEN YE=YE-1:Y=Y-48: YC=YC-&: 
XC=eic-5: X=X-408 <VX> 
4998 IF T=45 THEN YF=YF+1:Y=Y+1öı XA=X-16:%Y 
D=YCc+2: XC=iXC-2 <NE> 
sapa IF T=541 THEN YF=eYF-1:Y=-Y-18:ıX=-X+14:Y 
EC-YC-2: XCc=Xc#+H2 <HF> 
5siß IF T=43 THEN XF=/ÄF+1:X=-X+1ä:XC=XC#2 <B> 


Ein fesselndes Denkspiel für zwei Spieler: Stratfield 
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928 
350 
Sad —— 


ENDFROC 


558 PROC SPWAHL 

S56B FOR Z=-18 TO 18 STEF 2:50UND 9,ABS(Z 
),12,8:PAUSE S:NEXT Z:SOUND 0,0,2,2 

578 IF SP=8 

588 SP=1:POSITION 15,7:? #6; "ONE":POSITI 
ON 1,927 Höz"anı" 

598 C=1:01=99:02=89 

&BB EXEC SP1 

612 ELSE 

628 SP=QB: POSITION 1,9:? #6; "two":POSITIO 
N 15,727 #67"... 

638 C=2:C01=122:C02=121 

540 EXEC SP2 

458 ENDIF 

6642 ENDPROC 

678 
680 
698 
700 


PROC SP1 
REPEAT 
FOSITION 8,28:7 #5: "W.,CHOOSEABALL 


718 GET T 

728 UNTIL T=49 OR T=58 

738 POSITION 8,20:? #6: "NUMBER"; T-48:" 
WAS-CHOSEN" 

748 IF T=49 

758 I=1:EXEC TAST 

768 IF FR=1 

770 MOVE ADR{LE$) „PMB+1824,256:MOVE ADR( 
LO$) „PMB+1824+Y,14:POKE 53248,X:EXEC E12 
3 
788 
770 
822 
318 
828 


ELSE 

IF FLF=1 THEN EXEC TASTZ2 

ENDIF 

ELSE 

I=2:EXEC TAST 

83580 IF FR=ei 

842 MOVE ADR(LE$) „PMB+1289,754:MOVE ADR( 
LO) „PMB+1288+Y,14:PODKE 53249 ,X:EXEC E12 
5 


858 
BB 
8978 


ELSE 

IF FLF=1 THEN EXEC TAST_2 

ENDIF 

8sd ENDIF 

8728 ENDPROC 

Pad —— 

12 FROC 5SP2 

928 REPEAT 

738 POSITION 8,28:? #5; "\\CHODOSE-A,EALL 


un 
len ih ln en 


940 GET T 

95@ UNTIL T=49 OR T=58 

968 POSITION 8,28:7 #6; "NUMBER.";T-48;"ı 
WASACHOSEN" 

97a IF T=49 

988 I=S:EXEC TAST 

998 IF FR=1 

1D02 MOVE ADR(LE$) „PMB+1535,256:MDVE ADR 
(LO$) „PMB+1535+Y,14:POKE 53258,X:EXEC Ei 
23 
1818 
1022 
1230 
1040 
1250 


ELSE 

IF PLP=1 THEN EXEC TAST_2 

ENDIF 

ELSE 

I=IQD:EXEC TAST 

10640 IF FR=1 

107@ MOVE ADR(LE$) „PMB+PO,256:MOVE ADR(L 
0$) „PMB+PO+Y,14:POKE PKO,X:EXEC E123 
1080 ELSE 

1298 IF PLP=i THEN EXEC TAST_2 

1108 ENDIF 

111@ ENDIF 

1128 ENDPROC 

1138 —- 

1148 PROC PLPOSPRUEF 

1150 FR=2 

1148 IF T<>BRB OR T<>S59 

1170 IF YE=1 AND PEI(XF,YF)=@ THEN FR=1: 
PEICXF,YF)=1:PEI(XS{I) ,YS(D))=B 
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1180 IF YE=2 AND PE2(XF,YF)=8 THEN FR=1: 
PE2(XF,YF)I=1:PE2(XS(I) ,YSCI))=® 

1192 IF YE=S AND PES(XF,YF}=@ THEN FR=i: 
PESCXF,YF)I=1:PEICXSCTI) ,YS(O))=8 

1220 ENDIF 

1218 IF T=88 OR T=59 

1220 IF YE=1 AND PEIiCXF,YF)=B8 THEN FR=1: 
PEI(XF,YF)=1:PE2(XF,YF)=Q 

1238 IF YE=2 AND YEAtI)=1 AND PEZ(XF,YF) 
=8 THEN FR=1:PE2(XF,YF)=1:PEi(XF,YF)=8 
1248 IF YE=2 AND YEA(I)=3Z AND PEZ(XF,YF) 
=Q THEN FR=1:PE2(XF,YF)=1:PESCXF,YF)=8 
1258 IF YE=3 AND PESCXF,YF)=Q THEN FR=1: 
PES(XF,YF)=1:PE2(XF,YF)=8 

1260 ENDIF 

1279 ENDPROC 

1280 -- 

1298 PROC E123 

1388 IF YE=1:IF EitXF,YFI<>C:El(XF,YF)=C 
: COLOR C3:PLOT XC,YCE:COLOR C4:PLOT XC+1, 
YE:SE1IXF,YF)=® 

1318 ELSE :COLOR Ci:PLOT XC,YC:COLOR C2: 
PLOT XC+1,YC:SE1(XF,YF})=C:M=1 

13528 ENDIF :ENDIF 

1338 IF YE=2:IF E2ZCXF,YFI<>CaEZCXF,YF)=C 
: COLOR C3:PLOT XC,YC:COLOR C4:PLOT XC+1, 
YC:SE2(XF,YF)=B 

1348 ELSE :COLOR C1i:PLOT XC,YCE:COLOR C2: 
PLOT XC+1,YC:SE2(XF,YF)=C:M=1 

13598 ENDIF :ENDIF 

1348 IF YE=3:IF ESCXF„YFI<>C:ESCKF,YF}=E 
:COLOR C3:PLOT XC,YE:COLOR C4:PLOT XC+1, 
YC:SES(XF,YF)=8 

1378 ELSE :COLOR C1:PLOT XC,YC:COLOR 22: 
PLOT XC+1,YC:SESCXF,YF)=C:ıM-1 

1388 ENDIF zENDIF 

13908 IF M=1 THEN FOR Z=1 TO 15:SOUND 9,6 
Q,14,18:PAUSE 3:SOUND 9,8,2,@:NEXT Z:M=2 
1488 FR=® 

1418 ENDPROC 

14209 


14538 PROC GRAFIK 


1448 GRAPHICS 17:POKE 755,FPÄAGE 
1458 7 Kö "au2u 2 YEyzyYaaanaanau.!" 
1458 ? #5 "az VEYEY a ec = 
1470 7 BE EVENT Yon 
1458 ? #5 EEE YVEYEYyanaaa “ 
1498 7? #55 "naaaaaz VENEN th a = 
1580 7 Kb: "u YEeYEYann nn nn L 
1518 ? #53 EEE EEE EN Ay: yzy" 
1528 7? #53 rn a Tr * 
15350 7 #ö1 "un... .2.2.2, 02 YEYZYanan!" 
1548 ENDPROC 

1558 — 

1558 PROC DECLARE 


DIM YEA(4) „XS(5) „YS(5) ,XA(5) ,YAls), 
XCA (5) „YCA(S5) ,E1(4,4) ,‚E2(4,4) ,„E3(4,4) ‚G$ 
(5) 

1588 DIM LE$(254) „LO$(18) „PE1(4,4) „PE2(4 
„4) „‚PE3(4,4) „SE1(4,4) „SE2(4,4) ,SE3(4,4): 
C3=218:04=217 

1598 RESTORE 1538 

1588 FOR Z=1 TD 14 

1618 READ WıLO$(Z,ZI=CHRSE (W) 

1628 NEXT Z 

168308 DATA-28,22,58,59,61,125,125,127,127 
‚„126,126,62,68,28 

1548 ENDPROC 

1458 — 
1558 PROC INIT 

1578 PB=PEEK (186) -32:POKE 54279,PB 

1580 PMB=PB#2S4:POKE 559,62 

1698 FOR Z=53254 TOD 53259: POKE Z,@:NEXT 
Z 

1708 FOR Z=1024 TO 1792 STEP 2S5&4:MOVE AD 
RiLE$) „PMB+Z,2S6:NEXT Z 

1718 POKE 784,36:POKE 785,C0:POKE 796,14 
:POKE 7907,14 

1728 ENDPROC 

1730 -—- 

1748 PROC STARTKO 








17582 XAt1I=F1:XA02)=155: KA HD e12Ir Al) = 
123: YA(1)=1B3: YAtZ2)=71:YAt3)=1035: YACHI=7 
1 
1788 XS5(1)=-1:X45(2I=3:X5 (3) =3:X5 (4)=1:YS5 Lt 
131=3: YS(2)=1:Y5 (HI=-3:YS (41-1 

1778 FÜR Z=1 TO 4:YEA(ZI=2:NEXT Z:5P=8 
17808 PE2(1,3)3=1:PE2(3,3)=1:PEZ2(3,1)=1:PE 
2(1,0)=1 

1798 XCAt1)=5:XCA(2I=13:XCA(H =: XCAH)= 
F:YCA(1)=18:YCAlZ)=4: YCALFI=1B: YEACHI SS 
1888 ENDPROC 

1818 — 

1828 PROC STARTKO_2 

18358 XA(l1)=91:XA(l2I=1235:XA(DI=e1iI5: YAlı)>= 
123: YACLDI=B7:YAC(HI=71 

1848 XS (1)=1:X5(2)=2:X513)=3:Y5S(1)=3:YSt 
2)=2:YS(F9=1 

1858 FOR Z=1 TO 4:YEA(ZI=2:NEXT Z:SP=8 
1848 PE2t1,3)=1:PE2(2,2)=1:PE2(3,1)=1 
1878 XCA(1)=5: XCAC2I=9:XCAlFI=13: YCAl1)> 
18: YECA(ZI=B:YCA(ITI SG 

1558 ENDPROC 

1879 ——- 

17228 PROC FMBAU 

1718 MOVE ADR(LO$) „FME+1924+185,14: MOVE 
ADR (LOS) „FMB+1280+YA(2) „14:MDVE ADR(LO#) 
„PMB+1335+rYA(3),14 

1728 MOVE ADR(LD$) „FMB+1792Z+YA(C4) „14: POK 
E 53248,91:PODKE 532497,XA(Z) rFPOKE S35250,X 
A(ZI:POKE 53251,XAC4) 

1758 ENDPROC 

1748 — 

17580 PROC GEWINNER 

1758 FOR Z=1 TD 3 

1778 IF SE1(Z,1)=C AND SE1(Z,2)=C AND SE 
1{Z,3)=C THEN G=1:EXIT 

1988 IF SE2(Z,1)=C AND SE2(Z,2)=C AND SE 
2(Z,3)=C THEN G=e1:EXIT 

1778 IF SE3S(Z,1)=C AND SES(Z,2)=C AND SE 
3(2,3)=C THEN G=1:EXIT 

2828 IF SE1(1,Z)=C AND SE1(Z,Z)=C AND SE 
1(3,Z3=C THEN G=1:EXIT 

2Bıa IF SE2(1,7I=C AND SE2(2,Z>=C AND SE 
2(3,Z?=C THEN G=1:EXIT 

2828 IF SES(1,„Z)=C AND SES(2,Z)3=C AND SE 
3(3,Z)=C THEN G=1:rEXIT 

2u30 NEXT Z 

2848 IF G=8 

2850 FOR Z=1i TO 3:FOR ZZ=1 TO S 

zus0 IF SE1{Z,ZZI=C AND SEZ(Z,ZZ)=C AND 
SE3(Z,ZZI=C THEN G=1:EXIT 

2978 NEXT ZZ:NEXT Z 

2880 ENDIF 

2278 ENDPROC 

2188 —- 

2112 FROC WERTUNG 

2128 FOR Z=1 TD 4:POKE 53247+27,B:NEXT Z 
2138 IF C=1:G6$11,5)="ired.":ELSE :6#(1,5 
I)="white":ENDIF 

2148 POSITION 7,19:7 #5;6#(1,5) 

2158 FOSITION 8,20:7 #65 "ss. .,..has,.wona. 
2150 FOSITION 4,22:7 #55 "z2..,,PRESS,.STA 
RT" 

2178 ENDPROC 

2180 — 

2178 FROC TITEL 

2208 GRAPHICS 7+1&:POKE 559,8: POKE 7564,F 
AGE 

2212 COLOR 1:CIRCLE 49,59,20,48:C0LOR 2: 
EIRCLE 45,38,5,7 

2228 COLOR 1:PAINT 48,59: C0L0R Z:PAINT 2 
5,38 

2238 COLOR 3:PLOT 57,70: DRAWTO 150,78: DR 
AWTO 189,350: DRAWTO 57,38 

2248 PLOT 78,7B:DRAWTO 79,38:PLOT 119,45 
:DRAWTO 59,45 

2250 PAINT 95,35:PAINT 62,68 

2258 COLOR 2:CIRCLE 139,290,8,12 

227@ COLOR 1:CIRCLE 128,16,1,1 

2288 COLOR 2:PAINT 159,20 

2298 FOR Z=8 TO 8 STEP 2:PLOT B,Z:DRAWTO 








159-27*7,Z:NEXT Z 
2508 TEXT 8,0,"STRATFIELD" | 
231B TEXT &28,71,"VON": TEXT 49,81, "THOMAS 
„TENNERT" 
2328 COLOR 3:TEXT 49,89,"PRESS.START" 
25332 ENDPROC 
2340 — 
2358 FROC DIF 
23548 CLS #4: GRAPHICS 1+156:0=1:FOKE 756,P 
AGE 
2370 REPEAT 
23958 FOSITION 4,5:7 #6; "presssselect. u... 
“forıchoosing-game=-":POSITION 9,8:? #6; 
D 
2398 FOSITION 4,13:?7 #6; "PRESS.OPTION" 
24200 PK=PEEK (53279) 
2418 IF PK=5 THEN 0=0+1:FOR Z=-SB TO 88 
STEP 8:SOUND B,ABS(&8+Z) ,10,18:PAUSE 3:N 
EXT Z:IF 0O=3 THEN 0=1 
2420 SOUND 8,80,0,0 
2439 UNTIL Pk=3 
2449 ENDPROC 
2450 — 
2450 PROC SOUND 
2470 DSOUND 
24850 TRAF 24508: RESTORE 2550 
2498 READ H,„L:P=P+1 
2500 SOUND 8,H,18,L:SOUND 3,255,12,15:50 
UND 3,8,0,8 
2518 IF P>24 THEN SOUND 2,50+L,12,2 
2528 IF F=94 THEN P=B 
2550 PAUSE 9:50UND 2,8,0,08 
2548 IF FEEK(53279)=& THEN DSOUND :P=@:E 
NDPROC 
25590 GOTO 2499 
25658 DATA.108,7,754,8,91,7,81,10,0,98,91,8 
‚75,7,0,0,108,7,76,8,91,7,81,128,8,08,71,8 
‚76,7,0,0,81,9,91,8,96,7,81,9 
2578 DATA.0,0,81,9,8,08,72,9,2,0,8,8,0,2, 
81,18,71,9,81,10,8,8,76,8,8,8,71,10,0,2, 
0,8 
2588 DATA-I6,198,71,79,188,11,2,0,96,11,91 
‚„12,8,02,81,19,958,10,0,0,0,80, 
25928 ENDPROC 
2800 —- 
2618 FROC CHSET 
2620 RESTORE 2658 
26838 PAGE=PEEK (185) -32: CHS=PAGE#*25& 
26848 FOR Z=8 TO 2&:READ C:FOR Zi=8 TO ?7: 
READ A:POKE CHS+Z1+C#8,A:NEXT ZI:NEXT Z 
2650 DATAL3SS,0,94,66,78,119,78,78,8 
2660 DATA-34,0,50,76,75,98,78,118,8 
2670 DATA-35,0,94,78,96,96,1902,126,B 
2680 DATAS3s,0,92,66,98,78,1190,108,8 
26598 DATA-37,98,94,64,95,110,95,112,8 
2700 DATA-SIB,8,74,70,76,1098,96,76,0 
2712 DATALSF,0,94,64,96,1198,102,124,8 
2728 DATA-4B,0,56,66,118,98,78,99,8 
2738 DATA-41,0,16,16,24,24,24,24,0 
2740 DATA43,0,70,72,112,108,78,98,8 
2758 DATA44,0,64,64,958,76,98,119,8 
27&0 DATA45,0,6564,864,1986,196,98,98,0 
2770 DATA.45,0,32,90,185,185,110,102,8 
2788 DATA47,0,68,70,102,1922,98,60,8 
2798 DATA-48,8,72,790,102,188,96,75,8 
z800 DATASQ,O,72,66,78,188,798,98,8 
2812 DATAS1,08,682,78,112,14,98,124,B 
2828 DATA-52,90,126,22,16,24,24,24,8 
28380 DATASS,90,64,66,98,78,118,45,8 
28408 DATA-54,0,98,798,66,36,52,8,8 
28508 DATASS5,8,70,78,66,70,6908,36,8 
2858 DATAS54,8,0,0,0,15,0,0,8 
2878 DATA.57 ,255, 254,252, 248,240,224,192 


2888 DATA,58,1,3,7,15,31,63,127,255 

28908 DATA.17,3,24,24,24,24,24 ,24,24 

2720 DATA.18,126,195,196,2,12,48,195,255 
2718 DATA.2,2,0,0,0,0,0,0,0 

2728 ENDPROC 


xSU> 
<TH> 
rPp> 


sTP> 


'<HL> 


<KDF 
“0X? 
sHC> 
<JJ> 
“JD> 
<ET> 
sYZ> 


<CcU> 
saGE> 
<HR> 
JH? 


<VR> 
sUI> 


xF6> 


sHE> 


<SH> 
<PO> 
=VR> 
CI> 
“ON? 
<UB> 


SIk> 
<HU> 
<HS> 
“Le> 
<KT> 
<AB> 
scK> 
„HD> 
<IG?> 
<HQ?7 
<HR> 
<XD?> 
<Hf> 
ON? 
<SF> 
SLR> 
<HV> 
suUJ> 
<V/K> 
SAC> 
sXZ? 
<FD> 
“BJ> 


<H#O?> 
<R£L> 
HI? 
<HR> 
aH> 
<PB> 


Stratfield, ein fesselndes Denkspiel für zwei Spieler 


(Schluß) 
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Ein Käfer auf Wanderschaft 


Damit der kleine Käfer im großen Labyrinth am 
Leben bleibt, muß er Nahrung finden und vor den 
gefährlichen Wächtern fliehen. 


er Käfer Karl lebt in einem großen unübersichtlichen 
Labyrinth. Er muß die ganze Zeit herumlaufen, um 
Nahrung zu finden. Diese liegt in Form von kleinen 
roten Quadraten überall verstreut herum. Es befinden sich 
aber auch andere Sachen in den Gängen. Herzen bringen 
Ihnen Punkte ein, wenn Sie den kleinen Käfer steuern. 








Ein Teil des Labyrinths bei Wandering 


1 REM #** HOLGER WINKLER #%#* 

2 REM *** GERMANENSTR.96 #*#* 

3 REM ##* 4590 HERNE 1 ###+ 

18 GRAPHICS 7:POKE 559,8:DIM LAST(1) ,HIG 

Ht{1):FOR I=1 TO 14:READ WERT,J:POKE WERT 
„J:ıNEXT I:FOR I=24452 TO I+15 

2@ READ WERT,J:POKE I„WERT:FOKE I+88,J:N 

EXT I:SODUND 1,0,2,@:FOR I=2688@ TO 1+773 
:READ WERT:POKE I,WERT:NEXT I 

38 POKE 6253,16: POKE 87,15:POKE 88,8: POKE 
89,144:POKE 785,15 ‚ 

58 FOR I1=28674 TO I+79:POKE I,ö5:POKE I+ 

89,55: POKE I+1680,655:POKE I+3629,65:POKE 
I+36880,65:POKE I+376B,&5:NEXT I 

&8 FOR I1=28914 TO I+3288 STEP 89:FOR J=® 
TO 7:POKE I+J,85:NEXT J:ıFOR J=72 TO 79: 

POKE I+J,65:NEXT J:NEXT I 

80 FOR I=B TO 7:POKE 35945+1,PEEK (26931+ 
I)zNEXT I:FOR A=1 TO 117:READ WERT,J:FOR 
I=28922+WERT TO I+J:POKE I,2 

98 NEXT I:NEXT ArFOR A=1 TO 81:READ WERT 
‚JıFOR I=28922+WERT TO I+J*880 STEP 88:PO 

KE I,2:NEXT I:NEXT A 

128 LAST (B)=A:LAST (1)=B:HIGH (B)=Q: HIGH (1 
)=B:POKE 29614,8 

11@ FOR 1=27784 TO I+471:READ WERT: POKE 
I,WERT:NEXT I:FOR 1I=325982 TO I+1S:POKE I 
„129:NEXT I:60SUB 2890: 60SUB 3198 

120 POKE 1571,3:POKE 569,8:POKE 551,156: 

FOR I=B TO 5:POKE 48511+1,PEEK(32576+I)*+ 
18: POKE 32576+1,16 

132 NEXT 1:1I=4:SETCOLOR 8,1,8:SETCOLOR 1 
„I,12:SETCOLOR 2,1,4:SETCOLOR 3,7,4:POKE 
756,152:G05UB 2918 

148 POKE 512,227:POKE 513,159:POKE 54284 
‚192:POKE 559,&2:FOR I=® TO 7:POKE 53248 

+I,@:NEXT I 

158 I=PEEK (53279): IF I=5 THEN 3499 

160 IF I<>& AND PEEK(544)=1 THEN 158 

189 GOSUB 2979: POKE 28222,3- (PEEK (48593) 

=34) 
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Alles andere ist für Karl lebensgefährlich. Er darf weder die 
Wände berühren, noch sich von den umherstreifenden 
Wachen erwischen lassen. Eine Übersichtskarte zeigt an, 
wo die Wachen gerade sind. Wenn er nicht regelmäßig 
etwas zu essen findet, verhungert er. Die Balkengrafik zeigt 
an, wie groß Karls Nahrungsreserve ist. Die Wände passen 
sich der Zahl von Karls Leben an. Mit seinem dritten Leben 
kann er sogar durch die Wände hindurchlaufen, wenn er 
gut zielt. »Wandering« kennt zwei Schwierigkeitsstufen, die 
manmitder <SELECT >-Taste einstellt. Sie verändern nur 
die Punktegrenze, ab der Sie ein Extraleben erhalten. Auf 
Stufe 1 liegt die Grenze bei 1000 Punkten, auf Stufe2schon 
bei 10000 Punkten. 

Wenn Sie das Spiel anhalten wollen, drücken Sie die 
< OPTION >-Taste. Um das Spiel fortzusetzen, genügt ein 
Druck auf die <SELECT>-Taste. Die <STÄRT >-Taste 
beendet das laufende Spiel. 

Wenn Sie das Programm starten, dauert es rund zwei 
Minuten, bis die Daten gelesen sind. Bitte warten Sie 
solange, selbst wenn sich auf dem Bildschirm nichts tut. 

(Holger Winkler/gn/hf) 


Kassette, Diskette 


198 POKE 54285,64:POKE 559,0:POKE 512,389 
:POKE 513,125: POKE 798,154:POKE 7198,56:P 

OKE 711,76:POKE 756,224 

200 POKE 799,222:POKE 284,B:POKE 295,28: 

POKE 226,8: POKE 287,29:POKE 54276,9:POKE 
54277,0:POKE 53248,126 

285 POKE 1575,62: I=USR (34858) :POKE 34293 
‚1:POKE 1575,28: POKE 1597,1:POKE 1588,4: 

POKE 1589,16:POKE 1599,64 

2087 FOR I=@ TO 3:POKE 1585+1,0:NEXT I 

218 RESTORE 1298:FOR I=15364 TO I+32:READ 
WERT:POKE I,WERT:NEXT I:RESTORE sAQ: FOR 
I=265888 TO I+34:READ WERT 

220 POKE I,WERT:POKE I+5702,129:NEXT I:l 

=USR (28284) :POKE 53278,8:POKE 32568,115: 

POKE 32549,99:POKE 32573,9%0 | 

230 POKE 32578,111:POKE 32571,114:POKE 3 

2572,181:POKE 558,8:POKE 561,195: POKE 55 

9,62:POKE 54286,192 

235 POKE 35761,85:60SUB SBBQ:POKE 538,1: 

GOSUB 2978 

248 I=PEEK(53279):IF I=& THEN POKE 1571, 

2:G60T0 278 

245 IF I<& THEN POKE 538, (1=5) 

258 POKE 32562, (INT (PEEK (1571) /1@))+1&:P 

OKE 32563 , (PEEK (1571)- (PEEK (32562) -16) ®1 

B)+1& 

255 IF PEEK(1571) >PEEK (1582) 

2970 

262 IF PEEK(15648)=@ THEN 248 

278 POKE 538,8:50UND 8,8,8,8:SOUND 3,8,8 
„8:SOUND 2,8,2,@:FOR I=1 TO 3:SOUND 1,28 

2,18,18:FOR J=i TO SO0:NEXT J 

258 SOUND 1,8,8,8:FOR J=1 TO 250: NEXT J: 

NEXT IzIF PEEK(1571)=@ THEN POKE 559,8:6 

OTO 128 

298 FOKE 559,8:50T0 288 

4998 DATA-710,564,711,74,512,38,513,125,54 

2865 ,192,552,18,553,186,788,122,115,8,116 
„2@,53774,8,53277 ,3,704 ,22,54279 

















THEN GOSUB 











S@aQ DATA.135,255,0,255,8,255,0,255,24,25 
5,24,255,90,255,8,255,8,170,8,127,0,254,4 
9,127,124,254,56,127,16,254,8,85,8 

629 DATA-112,112,2,70,58,127,128,16,6,0, 
112,119,98,118,119,178,118,119,2,119,119 
„82,119,119,162,119,119,242 

618 DATA,119,119,55,120,87,146,129,129,® 
„136 

628 DATA72,169,104,141,9,212,173,39,6,7 
&,177,110,8 

630 DATA-1B,4,14,14,21,14,14,21,21,14,14 
„21,14,14,4,18,8,5,42,31,31,42,5,8,8,40, 
21,652,62,21,48,8 

648 DATA-10,4,14,30,5,14,14,21,21,14,14, 
5,38,14,4,18,8,5,42,31,31,42,9,8,8,36,21 
„62,62,21,40,8 

650 DATA.10,4,14,38,5,14,15,28,28,15,14, 
5,30,14,4,10,8,5,42,31,31,42,9,8,0,36,21 
‚62,62,21,24,8 

658 DATA-1B,4,14,31,4,14,15,20,28,15,14, 
4,31,14,4,18,8,190,42,31,31,42,18,0,0,36, 
21,62,62,21,20,82 

678 DATA-10,4,14,31,4,14,31,4,4,31,14,4, 
31,14,4,18,8,19,42,31,31,42,18,8,0,20,21 
‚62,62,21,20,8 

688 DATA-169,12,133,208,169,125,135,209, 
162,8,160,8,165,114,208,18,165, 203,24 ,21 
6,113,208,145,2098,144,8,169,0,200 

679 DATA-113,2908,145,208,136,165,114,248 
„18,177,298,216,56,229,203,145,208,176,8 
‚229,177 ,228,233,2,145,208,136 

722 DATA.220 ,220 ‚220,202 ,208,206,96 

718 DATA,.169,30,133,203,153,114,173,128, 
2,72,2081,14,288,21,165,284,240,4,1978,204 
‚„16,13,165,205,248,9,169,15,133 

720 DATA-204,32,211,105,198,205,169,8,13 
3,114,104,72,201,13,208,25,165, 204, 201,1 
5,176,4,230,2984,16,15,165,295,201 

738 DATA-49,176,9,169,0,135, 284 ,32,211,1 
25,2350,205,169,1,133,285,133,114,104,72, 
201,11,288,25,165,286 ,281,7,176,4 

740 DATA-232,206,16,15,165,287,201,62,17 
6,9,169,8,133,29065,32,211,185,230,207,169 
„2,133,114,124,201,7,208,21,165 

758 DATA-2064,2490,4,198,286,16,13, 165,287 
‚240,9,169,7,133,206,32,211,105,178,207, 
165,294 ,141,5,212,165,206,141,4 

755 DATA-212,169,0,141,3,210,173,129,2,2 
21,15,240,85,1698,4,162,08,74,176,1,232,13 
6,208 ,249 

768 DATA.282,288,71,173,128,2,162,255,74 
‚232,176,252,138,166,115,232,232,232,232 
„224,20,144,2,162,8,134,115 

772 DATA24,2168,181,115,1790,240,9,169,0, 
24,105,8,282,283,258,178,168,2,189,51,18 
5,153,105,140,232,200,192,8,144 

788 DATA244,238,116,155,116,74,144,10,1 
69,164,141,3,218,169,228,141,2,218 

798 DATA-162,0,32,0,189,162,1,32,8,109,1 
62,2,32,8,109,162,3,32,8,109,238,24,6,17 
3,24,6,281,8,144,3,32,73,189 

828 DATA-173,18,218,133,119,173,10,218,2 
21,113,144,249,201,126,176,245,133,12®,1 
6&90,0,177,119,208,19,159,139,166 

812 DATA.20,224,253,176,2,169,284,145,11 
9,224,245,176,3,152,145,119 

820 DATA-173,4,208,201,4,144,76,169,112, 
133,1290,169,62,56,216,229,207,24,105,258 
„144,2,230,120,166,285 

832 DATA-72,165,204,2@1,8,144,1,232,184, 
232,202,240,18,24,105,80,144,2,230,120,2 
02,208,246,166,206,224,3,133,119 

848 DATA,175,9,165,119,24,185,1,144,2,23 
2,12@,133,119,169,8,168,177,119,240,238, 
201,138,144,4,169,8,145,119 

850 DATA-165,20,208,26,174,31,6,169,8,15 
7,70,127,206,31,6,16,3,238,32,6,169,168, 
141,3,210,169,78,141,2,218 

868 DATA173,4,208,201,4,288,5,169,5,141 
„33,6,173,33,6,240,31,206,33,6,238,31,6, 
169 ,129,174,31,6,224,16,144,5 
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8702 DATA-162,15,142,31,6,157,70,127,141,: 


2,218,169,166,141,3,218,32,18,118 

858 DATA.141,39,288,173,199,2,24,185,16, 
141,199,2,76,66,136,9& 

Sa0 DATA-20,0,29,7,981,9,94,6,182,5,191,4 
‚243,5,253,5,262,3,275,08,355,2,414,13,49 
7,2,573,4,583,6,661,2,723,3 

918 DATA-734,3,741,2,821,2,882,1,885,2,8 
91,3,898,1,965,2,974,8,978,5,1043,4,1052 
‚8,1123,0,1132,12,12@83,3 

915 DATA-1212,1,1295,0,1297,6,1361,7,137 
1,4,1459,98,1520,10,1532,4,1618,8,1935,8 

920 DATA-515,2,679,24,745,9,841,21,7208,8 
‚1282,10,1814,5,1969,18,1895,5 

930 DATAL11643,6,1227,14,1254,4,1325,6,13 
85,3,1398,5,1397,6,1415,4,1552,3,1557,8, 
1573,5,1681,198,1694,1,1847,8 

948 DATA-1731,9,1774,14,1792,5,1840,3,18 
93,9,1939,7,1948,11,2055,8,2893,4,2101,3 
„2112,9,2213,9,2255,4,2261,5 

958 DATA.2268,2,2274,3,2356,1,2371,9,240 
5,8,2417,7,2514,5,2522,18,2564,18,525,17 
„367 ,3,3574,8,216,4,54,5,140,0 

940 DATA,2472,9,2683,19,2725,15,3068,2,2 
834 ,26,2889,11,2925,15,3226,6,2995,8,385 
1,11,3885,15,3281,4 

978 DATA-3156,7,32989,15,3243,19,3314,7,1 
4987,4,1647 ,2,1723,6,1885,3,2844,3,2205,3 
23563,4 

10800 DATA161,14,323,4,405,2,486,3,328,1 
2,178,16,12,9,1612,1,816,3,1377,3 

1218 DATA579,3,188,2,182,8,187,2,189,5, 
271,5,433,2,1927,4,2889 ,4,1931,4 

1038 DATA=2881,15,1923,14,1765,7,2885,4, 
2887 ,5,2889,3,2013,4,2335,2,1857,2,2019, 
2,2828,8 

1242 DATA.2181,0,26642,4,25804 ,9,825,6,202 
65,2,2426,9,987,3,1468,3,2828,2 

12858 DATA2428,7,1470,5,2359,8,1632,1,21 
92,12,2354,1,2834,5,595,2,37,5,677,3,131 
7,0,1637,1,119,8,839,3,1719,2 

18650 DATA-2199,3,1161,0,1641,12,1243,1,1 
405,1,41,6,123,6,45,5,127,2,128,1,50,3,1 
32,4,134,2,142,2 

1078 DATA-1211,3,1811,6,1813,6,1973,2,1® 
20,3,2462,0,3828,8,942,11,23@82,11,1571,1 
‚1983,64,1809,8 

111® DATA215,189,12,6,221,8,298,5,173,2 
4,6,16,18,201,2,228,23,169,7,56,237,24,6 
„24,125 

1120 DATA-8,6,158,169,8,153,24,104,169,2 
55,153,56,184,288,32,2921,3,189,8,6,178,1 
60,8,176,12,38,24,184,62,56, 104 

1135@ DATA-232,136, 208,245 ,249,10,94,24,1 
04,126,56,184,232,1356,208,246,96,32,159, 
110,234 ,234 

1140 DATA-162,31,169,0,157,56,184,169,25 
5,157,24,184,282,16,243,162,255,232,189, 
2,6,133,117,189,4,6,133,118 

1158 DATA,169,9,16508,8,145,117,189,16,6,1 
33,117,157,0,6,199,20,64,133,118,157,4,6, 
138,24,105,67,168,8,145,117 

1155 DATA.1490,25,6,165,20,197,19,176,5,1 
89,12,6,16,15 

1168 DATA.238,25,6,172,25,6,189,12,6,89, 
26,6,157,12,6,168,89,148,264,6,221,8,240, 
17 

1178 DATA.168,9,221,2,248,11,168,1,148,2 
6,6,281,3,176,2,160,0,1356,16,18,165,117, 
56 ,237,26,6,133,119,165 

1188 DATA-118,133,129,176,2,198,120,16,1 
6,165,117,24,189,26,6,133,119,155,118,13 
3,1282,144,2,239,129,1628,0,177,119 

119Q0 DATA.201,65,248,170,221,2,240, 166,1 
65,119,157,16,6,165,128,157,28,6,138,24, 
185,71,168,8,145,119,224,3,176,3 

1288 DATAx76,95,189,96 

1218 DATA.173,4,298,291,8,288,3,238,34,& 
„173,34,6,249,49,173,68,127,281,17,169,2 
1,144,2,169,16,141,68,127 
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»Wandering«, ein Spiel fur Leute mit Fingerspitzengefühl 
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1220 DATA2162,3,144,18,254,64,127,189,64 

„127,201 ,26,144,8,169,168,157,64,127,202, 

16,238, 224,3,176,3,2398,35,6 

1238 DATA-205,34,6,141,36,6,162,0,173,36 

‚„6,249,5,162,168,286,36,6,141,4,218,142, 

5,2198,169,8,133,77 

1248 DATA-173,4,288,18,19,12,19,18,18,24 

0,3,238,32,6,173,32,6,248,8,169,58,141,2 

6,2,286,35,6,96 

1259 DATA-124,169,113,133,129,168,0,132, 

119,177,119,201,65,240,8,281,2,240,4,169 

‚„0,145,119,208,208,239 

1250 DATA-238,128,165,12@,201,127,144,23 

1,96 

1278 DATA155,29,201,9,176,6,165,19,185, 

15,133,19,169,0,141,24,6,96,73,3,141,39, 

6,141,8,212,104 

1280 DATA.64,0,2,0,2,8,2,0,0,8,0,2,2,8,8 
2,02,2,0,0,0.2,0,0,0,0.0,0,0,0 

1298 DATA-5®,122,.1@3,57,116,125,125,113, 

0,8,16,24,8,2,2,8,138,42,23,137,116,125, 

125,113,8,0,8,3,2,1,2,15,® 

2280 REM *** STARTBILD ##% 

2010 RESTORE 22020 

20408 FOR I=39936& TO I+31:READ WERT:POKE 

I,WERTENEXT I 

2250 FOR 1=398920 TO I1+59*8-1:READ WERT:P 

OKE I,WERT:NEXT I 

28640 FOR I=39968 TO I+19#40-1:READ WERT: 

POKE I,WERT:NEXT I 

2970 FOR I=40448 TO I+5*40-1:READ WERT:P 

OKE I,WERT:NEXT I 

ZaB0 FOR J=® TO 2:FOR 1I=487981+J*48 TO I+ 

12:READ WERT:POKE I,WERT:NEXT I:NEXT J 

2170 FOR I=48928 TO I+26:READ WERT:POKE 

I,WERT:NEXT I:POKE 512,227:POKE 513,159: 

POKE, 54286,192 

2188 RETURN 

2190 DATA112,112,112,68,32,156,4,4,4,4, 

4,4,4,4,4,4,132,4,5,5,5,4,4,4,4,4,3,4,4, 

65,0,156 

2200 DATA85,85,85,85,85,87,86,86,85,85, 

985,85,85,255,255,85,85,85,85,85,85,213,2 

13,213 

2218 DATA213,213,213,213,213,213,213,21 

3,213,213,95,95,85,85,85,85,85,170,170,8 

5,85,85,85,85 

2228 DATA-86,96,386,85,95,95,85,95,86,86, 

84,86,86,96,86,86 

2238 DATA.85,85,85,85,85,85,85,85 

2240 DATA-217,217,217,217,217,217,217,21 

7,217 ,217,217,218, 213,213, 213,255,217,21 

7,217,217,89,89,89,249 

2258 DATA2217,217,217,218,85,85,95,255 

2260 DATA-170,213,213,213,223,217,217,21 

7,170,85,95,95,255,35, 85,85, 169,89 ,89.,89 

„217,217,217,217 

2278 DATA-218,213 „213,213,215,217,217,21 

7,217,89,89,89,217,217,217,217 

2288 DATA2169,217,217,217,217,217,217,21 

7,217,217,217,217,217,217,217,245 

2292 DATAS85,149,191,181,217,217,217,217 

‚35,85,85,179,95,85,85,255,217,217,217,8 

7,89,181,191,149 

2320 DATA169,89,89,89,245,95,85,85,85,8 

5,85,169,89,99,89,245 

2318 DATA2218,213,213,213,214,213,213,21 

7,17@2,85,85,35,255,149,101,99,86,213,117 

‚93,97,85,85,85 

2328 DATA-85,149,121,89,99,217,121,89,21 

7,87,89,89,249,85,95,85,106,213,213,213, 

255 ,85,85,85 

2338 DATA-85,127,119,119,119,119,119,127 

‚85,93,125,93,93,93,93,93,85,127,87,87,1 

>724317.317,.127 

2340 DATA85,127,87,87,127,87,87,127,85, 

119,119,119,127,87,87,87,85,127,117,117, 

127 ,87,37,127 

2350 DATA485,127,117,117,127,119,119,127 

‚85,127,87,87,93,93,117,117,85,127,119,1 

19,127,119,119,127 
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2368 DATA-85,127,119,119,127,87,87,127 
2378 DATAs85,1981,181,121,181,1@81,101,185 
‚85,35,85,169,153,153,153,1798,85,85,85,1 
265,121,106,86,10& 

2382 DATA.85,589,89,106,89,39,89,89,85,85 
‚85,186,1@1,101,121,186,85,85,85,196,10@2 
‚182,122,18& 

2398 DATA,85,35,985,89,90,89,389,89,85,85, 
85,184,102,1264,101,106,85,85,35,85,99,85 
‚90,85 

2428 DATA,S5,181,181,1064,1982,1902,182,182 
‚85,35,85,89,35,99,89,89,85,85,85,196,1® 
2,126,86,90 

2418 DATA85,85,127,119,119,127,117,117, 
85,85,117,125,117,117,85,85,85,127,119,1 
27 ,117,127,85,85 

2429 DATA-85,127,117,127,87,127,85,85,11 
7,117,253,117,117,117,85,85,85,85, 253,22 
1,221,255,85,85 


2,2. 2.9:5 
2518 DATA, 
2.2 9.2.2.2 
2,2 DI 

2520 DATA-B, 
9,9,9,9,9,9, 
9,9,9,4,4 

2530 DATA.8,8, 
‚„14,15,16,14,15, 
14,15,16,14,15,1 
2540 DATA.8,8,9, 
18,9,10,18,9,10, 
2,10.9,9,9,9,9, 9,9,9,4 


»7,17,14,15,16 
A, {4, 15, 16, 19, 


I 


IT im, 10,7,.18, 
‚9, iB, i®, 12, 7, 1 


7 

2558 DATA.S, S, 9,9,9,9,9,190,19,12,17,15,1 
8,18,9,10,10,9, 18, 17,15, 24 ,26,27,30,10,1 
2,9, 12.120,31, 16, 9,9,9,9,9,9,4,4 

2560 DATA-8,8,9,9,9,9,9,11, 15. 12,20,9,28 
„28,9,20,11, 22, 23,11,22,.25,20,28,29, 20, 2 
2,9, 20, 11, 22, 12 9,9,9,9,9,9,4,4 

2572 DATA.S, 8, 9,9,9,9,9,9,9,9,9,9,9,95,9, 
9,9,9,9,9,9,9,9. 9,9,9,9,9,9,9,9,9,9,9,9, 
9,9,9,4,4 

2588 DATA-8,7,6,6,6,6,6,6,6,6,6,6,6,6,6, 
6,6,6,6,6,6,6,6,5,6,5,6,6,6,6,6,6,6,6,6; 
6,6,6,5,4 

2590 DATA27,6,6,6,5,536,5,65,5,6,6,6, 6,5, 
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6, 6,6, 
6,6,6,6,5 

2620 DATA.2,0,0,0,0,0,0,08,1,2,2,2.,2,2,2, 
2:2,.2.2.2,252.2,742,2,2,2,2,2,3.0.,0;0,0, 
2,0,0,80,8 

2618 DATA.2,2,8,0,8,8,08,8,8,9,42,43,44,4 
5,9,44,46,47,48,49,9,50,9,32,32,32,32,32 
‚32,9,4,8,2,8,2,0,2,8,2,2 

2520 DATA.0,2,0,0,2,0,0,8,8,9,51,52,53,5 
1,9,44,46,47,48,49,9,50,9,32,32,32,32,32 
‚32,9,4,0,8,0,0,8,2,0,0,8 

2638 DATA.2,2,8,8,0,08,2,2,8,9,9,9,9,9,44 
„49,42,49,46,45,9,58,9,9,9,33,9,9,9,9,4, 
2,8,8,2,2,02,8,2,8 

2635 DATA.0,8,9,0,0,0,8,8,7,6,6,6,6,6,6; 
6,6,6,6,6,6,6,5,65,6,6,6,5;,6,6,5,80,9,20,2, 
2,0,2,0,0 

2448: DATA-1,2,2,2,2.2)7,2,2.7,2.2,3 

26458 DATA-8,182,1853,184,185,185,9,185,18 


6,187,183,186,4 

265648 DATA7,6,6,6,6,6,6,6,6,6,6,6,5 

2988 DATA.168,172,162,72,173,224,159,141 
„10,212,141,22,298,173,225,159,141,23,28 
8,173,226,159,141,24,288,194,64 

2918 A=5: J=0: WERT=9:FOR I=@8 TO S:J=J+(PE 
EK (48511+1)-32) #10”"A: WERT=WERT+ (PEEK (485 
51+1)-32)#10"ArA=A-1:NEXT I 

2922 LAST {PEEK (49593) -33)=J: IF J<=HIGH(P 
EEK (498593) -33) THEN RETURN 

2938 FOR I=8 TO 5:POKE 43551+I,PEEK (4851 
1+I) NEXT IzFOR I=® TO 7:POKE 53248+1,0: 
NEXT I 

2935 HIGH (PEEK (49593) -33)=J: RETURN 

2948 DATA-2,8,179,127,254,127,1780,8 


<OoH> 


NB> 


<Nh> 


SAX > 


sLP> 


DC> 


XL} 


«VA> 


yYV> 


<00> 


<KN?> 


<06> 


<VP> 


SYH> 


sEV> 


<X5> 


<05> 


“yr> 





2959 DATA.B,84,62,124,62,124,42,0 
2968 DATA2170,127,254,127,254,127,254,85 
2970 IF PEEK(1571)>3 THEN POKE 1582,PEEK 
(1571) :RETURN 
2988 RESTORE 2938+PEEK(1571)*18:FOR I=® 
TO 7:READ WERT:POKE 26640+1,WERT:NEXT I: 
POKE 798,58+32#PEEK (1571) 
2998 POKE 1582,PEEK (1571) RETURN 
3Q@0 RESTORE 3000 
3g18 FOR I=1 TO 8 
3028 READ WERT:SOUND Q@,WERT,1B,10:READ W 
ERT:FOR J=® TO WERT:NEXT J:SOUND 0,8,0,8 
:READ WERT:FOR J=B TO WERT:NEXT J 

NEXT I:zRETURN 


DATA99,10,5,99,18,5 
DATA99,15,5,120,20,15 
DATAL120,15,10,130,28,15 
DATA-138,28,15,149,50,5 


FOKE 3481&,112:POKE 34817,78:POKE 3 

4818,B:POKE 34819,144:FOR I=8 TO 44:POKE 

I+34829,14:NEXT I 
Z11@ POKE 34865,55:FPOKE 348454,8:POKE 348 
67,105 
3128 COLOR 2:PLOT 47,45:DRAWTO 47,8: DRAW 
TO 37,8:POSITION 37,45: POKE 755,2:XIO 18 
‚#6,2,0,"5:2" 
3138 PLOT 122,45:DRAWTO 122,80:DRAWTO 112 
„Z:POSITION 112,45:XIO 18,86,9,0,"5:" 
3148 PLOT 48,0:DRAWTO 111,8:PLOT 48,1:DR 
AWTO 111,1:PLOT 48,44:DRAWTO 111,44: PLOT 
48,45:DRAWTO 111,45 
3158 COLOR 1:FOR I=8 TOD &53:FOR J=8 TO 41 
3158 IF PEEK(28922+1+J*80)=2 THEN PLOT I 
+48,J+2 
317@ NEXT JıNEXT I 
=19@ RESTORE 3200 
3200 DATA-194,152,8,138,157,08,1397,157,8, 
141,232,288,247,95 
3218 FOR 1=-34858 TO I+13:READ WERT:POKE 
I,WERT:NEXT I 
3228 FOR 1=34882 TO I+735rREAD WERT:POKE 





Nur mutige und reaktionsschnelle Piloten über- 
leben den mörderischen Flug über Bellum 2. 


| er große Krieg zwischen Batarianern und ihrem 

BD “eserscen Nachbarvolk, den Comaden, dau- 

erte schon 10 Jahre. Denis war nicht bereit, sein 

Leben irgendwo sinnlos zu vergeuden. Er wollte dem Krieg 
ein Ende setzen. 

Schon lange munkelte man von einem riesigen Kriegs- 
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I,WERT:NEXT I 

3238 FOR I=35872 TO I+1B4:READ WERT: POKE 
I.WERT=:NEXT I 

329@ RETURN 

3320 DATA.169,152,56,229,297,170,165,206 
‚„281,4,144,1,282,165,28,74,74,176,2,162, 

9,142,1,208 

3318 DATA173,40,6,24,185,177,1790,169,2, 

157,8,141,165,285,141,490,6,24,185,177,17 

0,165,204,221,19,144,4,232 

3328 DATA238,48,6,169,1,157,9,141,162,8 
‚32,0,137,232,224,4,144,248 

33358 DATA.2338,26,2,96 

3358 DATA-189,28,6,56,233,112,141,42,6,1 

89,16,6,56,233,259,141,41,6,176,3,206 ,42 
‚6,169,0,141,43,6,173,42,6 

3368 DATA-2928,7,173,41,6,201,89,144,19,1 

73,41 ,6,56,233,88,141,41,6,176,3,286,42, 

6,238,43,6,16,225 

3370 DATA.169,95,24,189,41,6,157,4,208,1 

89,47,6,185,177,168,185,8,139,93,51,6,15 

3,0,139,173,43,6,157,47,6 

33582 DATA2189,47,6,105,177,168,185,0,139 
‚93,51,6,153,8,139,96 

3400 POKE 49593,PEEK (48593)+1:1IF PEEK(40 

593)=35 THEN POKE 408593,33 

3418 WERT=LAST (PEEK (48593) -33) : A=PEEK (49 

593) 

35420 J=HIGH (PEEK (48593) -33) 

3438 FOR I=5 TO 8 STEP -1 

3440 POKE 48516&-1,INT(WERT/18*I)+32:POKE 
49593 ,A* (I=INT (1/2) #2) +9#(I<>INT(1/2)#*2 
) 

3458 POKE 40556-1, INT (3/1071) +32 

3460 WERT=WERT- ( (PEEK (498516-1)-32) #191) 
3478 J=J-( (PEEK (48556-1) -32)*19”1) 

5488 NEXT I:POKE 49593,A 

3490 IF PEEK(53279)<>7 THEN 3498 

35@0 GOTO 158 


»Wandering« (Schluß) 








planeten. Dorthin hatten sich die sieben Mächtigen der 
Comaden zurückgezogen. Wo sich dieser Planet befand, 
wußte niemand, genau wie niemand sagen konnte, ob das 
Gerücht der Wahrheit entsprach oder eben nur ein Gerücht 
war. Denis glaubte dem Gerücht. 

Das sechs Planeten umfassende System um die kleine, 
blauweiße Sonne Bellum wurde allgemein als Heimat der 
Comaden angesehen. Dort vermutete Denis daher auch 
den Kriegsplaneten. Bevor er an seinem ersten Einsatzort 
angekommen wäre, desertierte er mit seinem Raumgleiter 
und nahm Kurs auf das Bellum-System. Dort erwartete ihn 
tatsächlich ein waffenstarrender Planet: Bellum 2. Aber war 
es der, von dem die Gerüchte sprachen? 

Hier beginnt Ihre Aufgabe. Sie fliegen an Denis Stelle 
über den Planeten, um sein Geheimnis zu enträtseln. Da- 
bei müssen Sie sich vor den Verteidigungsbasen in acht 
nehmen, die Sie unaufhörlich beschießen. Die Arax besitzt 
zwareinen Schutzschirm, doch mehr als fünf Treffer hältsie 
nicht aus. Die Belastung des Schildes macht sich auch 
farblich bemerkbar. Bei jedem Treffer wird der sonst dunkle 
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Schutzschirm heller und wenn er rötlich glüht, ist der näch- 
ste Treffer tödlich. 

Sie sind natürlich nicht wehrlos, denn die Arax verfügt 
über Bomben und eine Schnellfeuerwaffe. Die Bomben 
sind zwar schwieriger einzusetzen, dafür aber wirkungsvol- 
ler. Beim Abwurf schlagen sie genau dort ein, wo das 
Fadenkreuz vorher zu sehen war. Die Waffe wechselt man 
durch Druck auf die <SPACE > -Taste. 

Wenn Sie das Spiel starten, erscheint erst ein Titelbild. 


Wenn Sie die <START >-Taste oder den Feuerknof des 
Joysticks in Port 1 drücken, beginnt das Spiel. 

Arax besitzt auch eine Pause-Funktion, damit Sie sich 
während des Spiels kurz erholen können. Mit der 
<ESC>-Taste frieren Sie alle Aktionen ein, bis Sie wieder 
den Feuerknopf drücken. 

Im Spiel erhalten Sie für jeden zerstörten Teil einer Basis 
100 Punkte und für eine komplett zerstörte Basis sogar 








Programmname :ARAX.COM 2278:55 85 55 15 
Länge 17972 Bytes 8278:154 57 55 4 
— - 2288:55 4C 55 57 

i 9788:36 14 54 B5 
BaBB:FF FF ODE SC A? 208 24 <öF> 829798:55 56 54 85 
Baar 32 15 1A 14 14 14 16 <24> 23298:05 85 54 1& 
Bu18:15 15 51 52 52 52 52 52 <BS> BZAB:S7 58 55 59 
B818:52 52 3535 14 51 52 32 52 <4B> B2n8:58 58 5 58 
0820:52 52 32 52 32 52 52 52 <FB> B2B0:56 14 54 85 
Bu28:32 32 52 32 32 32 32 352 <23> 22B8:85 56 54 85 
0950:55 15 51 SZ 52 32 32 52 <397> 22C0:55 85 5& 1& 
2238:52 53 54 85 55 85 55 85 <5D> B2C8:58 Sa 58 58 
2949:55 85 56 15 54 51 532 52 <32> 0209:59 59 58 58 
2048: 52 2 2 2 2 2 2 22 <B3> 22D08:56 16 54 85 
BasBı52 52 52 32 52 22 532 73 <OC> B2Z2EB:55 55 54 585 
2358:56 154 54 85 55 85 55 85 <D1> BZEB:BS 85 564 16 
2059:55 54 54 985 85 4C 85 4 <Ad> BZFR:4C 55 46 55 
0858:05 85 55 14 54 54 51 353 <TFF> B2FB:4C 55 4C 55 
3878:4C 55 46 55 40 55 4 55 SEF> 2594:55 14 54 25 
Bar8:A4c 55 4C 55 ACC 55 53 54 <F4> a5n9:05 54 54 05 
20909:55 16 54 85 85 4C 85 4 <BR> 08310:55 85 52 15 
2088:85 54 54 85 55 85 4C 85 <D?7> 0318:58 59 58 58 
29970:55 85 54 14 54 54 55 51 <74> 3328:58 398 58 58 
209978:52 32 32 532 32 32 52 52 {öE> 0328:54 15 54 B5 
BaAB:SZ2 52 52 52 32 55 55 55 <B4> 2358:55 56 57 58 
BaAB:Sh 14 54 85 355 85 Acc 85 <70> n339:59 58 597 16 
BBBB: 55 56 54 85 85 4 85 40 <77> 2542:58 58 58 58 
B0BB:05 85 56 14 54 54 4C 54 <55> 0348:58 59 58 58 
BaCH:51 52 52 52 52 52 52 52 <1B> 2350:57 1& 57 58 
BACB: SZ 32 32 32 55 5 4 56% <BE> 23598:58 57 1& 14 
DaDa:55 14 54 85 85 4C 85 4C <CB> B550: 16 16 16 16 
BRDE:B5 J& 54 85 55 85 ACC 85 <ZB> B3558: 16 16 16 16 
BBEB:SS 85 54 154 54 54 55 54 £57> 2570:B8 14 1& 16 
BBEB8:54 51 5.4055 I 5 4C <2D> 2378:15 15 1& 16 
BAFB: SS 4C 55 535 55 565 55 54 <12> B58B8:1& 156 15 16 
DaF8:54 14 54 05 55 85 4C 05 <äd> 2598:16 16 16 16 
3189:55 565 54 85 85 4C 05 4C <SC> D570:1& 1& 1& 16 
DB108:05 85 55 14 54 54 4C 54 <DB> B578:05 14 164 1& 
23110:54 55 51 52 52 532 232 32 <ZF> BAR: 1b 16 16 
8118:52 32 53 55 5 565 4 56 <{589> B3sAB:ld 1& 16 16 
28120:55 14 54 85 85 4C 85 4C <5D> DSBB:1& 15 1& 1% 
B178:B5 54 54 05 55 85 4C 85 <37> B3BB:16 14 14 16 
81398:55 05 56 15 54 54 55 54 <IC> 2B5CH:08 15 14 1& 
8138:54 46 54 51 55 AC 55 4C <C1> B3lce:1lä 14 48 497 
2149:55 55 54 46 54 54 55 55 <B9> B308:1& 15 165 1& 
2148:55 15 54 85 55 85 4C 05 <DA> 23D8:1&4 14 16 1& 
2158:55 55 54 85 85 40 85 4C <DC> B3SEB:1& 1& 1& 145 
8158:85 85 54 14 54 54 4C 54 <BA> D3E8:85 14 16 15 
81858:54 55 54 55 51 52 32 532 <F7?7> BSFB:1& 15 4B 4C 
2B158:53 55 564 55 54 5a AC 55 {FF> BSFB: 16 15 16 1& 
2178:55 1& 54 585 85 4 85 4 <2C> Bad: 1a 48 497 4A 
2B178:85 54 54 85 55 85 4C 85 <87> 240: 1 1 16 
2188:55 85 54 14 54 54 55 54 <ED> B410:08 16 15 I 
2188:54 4C 54 46 54 5F 408 41 <?F> B418:1&4 16 IE 4F 
819798:54 4C 56 4C 56 56 55 56 <18> 0420:1&4 14 92 15 
3198:54 14 5#+ 85 55 85 4C 885. <7A> B428:15 4B 4C 4D 
21AB:55 54 54 05 85 4 85 SC <öäb> 24308:1& 14 16 1& 
BiAB:05 05 54 14 54 54 ACC 54 <7B> 2438:05 16 164 14 
B1B8:54 55 34 55 54 42 4C 44 <B8> 2440: 16 16 15 15 
91B8:355 55 56 55 54 54 4 54 <35> B44B:1& 14 72 16 
B1CB:55 14 54 85 85 4C 85 4C <FD> 2450:14 4E 4F 58 
Bi1iCcB:05 54 54 85 55 85 A4C 85 <12> B458:16 15 14 164 
210D8:355 85 54 15 54 54 55 54 <BD> B4h: Be 15 1 16 
8108:54 4C 54 4C 54 45 46 47 <4A> 2458:16 14 14 1& 
BIEB:SA SC 56 4 54 54 55 56 S2B> 2478:15 15 92 92 
BIES:56 1& 54 85 55 85 ACC 85 <2A> 08478:1& 14 16 1% 
B1F8:55 564 54 85 85 4C 85 4£ <3C> 2458:15 14 165 165 
B1iF8:85 85 554 14 54 54 4C 54 <AB> 2488:05 16 165 1& 
2280:354 535 54 55 57 58 58 58 <37> 24970:15 14 164 16 
2208:57 55 56 5 56 56 4 5& <DE> B4978:1& 15 95 97 
2218:55 15 54 85 85 4C 85 4C <BA> BanBElh 16 is 1b 
2218:05 55 54 85 55 85 4C 85 <öl> Bandıls 1 16 16 
2228:55 85 56 15 54 54 55 54 <2A> 84B9:08 14 51 52 
2278:54 ac 54 57 55 4& 5 4 <IB> B4BB:1& 16 15 16 
22398:55 597.56 SC 54 54 55 564 <BD> B4CQ:14 16 95 92 
23238:55 16 54 05 55 85 4C 85 <iCc> BACB:r1& 16 16 id 
22498:55 54 54 85 85 4C 85 46 {CA> B4DB:1& 16 14 1& 
2248:B5 85 54 15 54 54 AC 54 <18> 84D8:85 14 54 AC 
28250:54 55 57 58 58 583 55 58 <1C> Q4EB:05 O4 05 D& 
2258:58 58 39 5 55 55 4 56 <71> D4E8:05 B& 92 95 
8240:55 15 54 85 85 4C 85 4C <i1A> B4F0:1& 154 14 16 
2258:085 54 54 85 55 85 40 85 <71> Q4F8:15 16 15 1& 


112 





1000 Punkte. (Martin Horst/gn/hf) 
54 54 55 54 <DC> B5a0:08 15 54 46 4C 54 15 14 <DB> 
ss 4C 55 4C <1D> B588:B8 05 55 85 85 85 85 085 <935> 
sb 56 535 36 <SE> B518:85 085 75 29575957 <s355> 
= 85 40 85 <Ac> B51B:14 1& 15 15 14 16 15 1& “28> 
85 4C 85 4C <1A> 2528:1& 15 15 14 85 85 85 85 <2A> 
Ss4 54 46 54 <69> B528:B5 15 57 58 58 57 16 16 {F4> 
>93 58 58 58 <1B> 2558:05 85 85 85 55 85 B5 85 <FA> 
57 56 4C 54 <BB> 0538:85 85 #5 4C #2 95 92 92 <13> 
05 4C 85 4C <DF> 2540:972 15 154 15 154 14 14 14 <B7> 
55 85 4C 85 <C35> B548:1& 16 14 16 BB 85 85 85 <AA> 
54 54 55 57 <CE> B550:08 15 1& 16 16 16 16 1& <53> 
„a Sg 5a 58 {82> B558:08 85 85 05 55 285 85 85 <ES> 
3 39 35 5 {275 1545 5 9 95 95 92 95 95 SCH 
3 825 4 05 <3C> 2568:#2 16 15 1& 154 14 14 1& <EF> 
85 46 85 40 <2A> 2572:15 15 15 1& 85 85 85 85 <F#> 
54 54 57 55 <DO> 0578:05 1& 14 16 15 154 1& 1& <F9P> 
4c 55 4 35 <äc> 2598:05 85 85 85 85 D& 85 Ba <öf> 
4C 55 59 56 <6F> ASB8:05 B& 95 92 95 95 92 92 <F6> 
25 4C 85 4C <2B> 5570:972 15 16 16 I& 51 52 52 <78> 
ss 85 55 85 <äD> 2598:52 55 15 165 88 085 85 85 <28> 
54 57 58 58 <2ZE> BA: 05 Di 05 D& 05 5 05 <> 
Ja 5B 58 58 <09> B5AB:BO 85 05 05 85 16 16 16 <AÄB> 
8 58 58 59 22> B5BB:i& id 92 95 92 9 95 95 SB5> 
55 85 55 85 <88> BSBd:F72 92 154 165 14 54 46 40 <I3A> 
sa 58 58 58 <EB> BSCB:4C 54 15 16 85 85 85 85 <BS5> 
37 58 Sa 58 <ED> 28508:85 85 85 85 BS 85 55 85 <D2> 
sg 85 85 85 <BE}> 2509:05 085 85 85 88 1& 16 15 {b4> 
„a 58 58 58 <F9> B5D8:14 14 92 92 95 972 AC 972 <E2> 
53 58 58 58 <Al> B5SEB: 72 95 92 15 16 54 4C AC <5I> 
15 14 14 14 <CF> DSEB:-4C 55 15 15 BB 85 085 85 <B5> 
15 15 15 15 {&52> BSF8:05 85 85 55 85 85 85 85 <FA> 
B8 85 85 85 <öö> BSF8:05 05 05 25 85 16 16 14 <79> 
15 15 15 15 <4AF> BABd:lIh 16 95 92 95 92 95 92 <FA> 
15 15 16 165 {FD> DZ 75 92 16 16 54 IC Acc <19> 
1& 15 14 15 <{B2> B51B:4C 5a 15 15 85 85 85 85 <47> 
154 16 14 16 ZaA> 2518:05 85 85 85 85 85 85 85 <24> 
25 85 85 85 <95> 2520:85 85 85 85 88 1& 15 i& <BB> 
1& 1& 14 154 <15> 0528:1& 1& 92 95 972 95 92 95 <c9H> 
15 15 15 14 <{A&A> 34530:92 95 92 15 15 57 58 58 <309> 
1& 15 1& 16 {BA> 2538:58 57 15 15 98 85 85 85 {DE> 
15 15 16 15 <Bö> 25498:05 BA 085 BA 85 DS 85 85 <A8> 
Ba 05 25 85 <Dö> B448:05 85 85 DA 85 14 14 14 <DB> 
1& 16 15 1& <BF> B550:165 14 F2 95 975 92 95 95 SSD> 
ah 16 14 15 <C9> B558:975 75 95 92 1& 15 164 16 <D2> 
1& 15 15 14 <DE> Bbäelhs 1b 16 15 B5 85 95 85 <SC> 
1& 15 14 15 <DE> 0558:95 15 14 15 15 085 85 85 <ö4> 
235 85 B5 85 <E&> 8578:05 DS 14 1& id 1& 1& 1& <2E> 
15 15 16 14 <42> D478:15 14 95 40 95 92 95 972 “16> 
4D 16 15 14 <3B> 0480:75 72 975 95 16 15 15 15 <1B> 
1& 14 14 1& <7A> B488:1& 15 15 15 BE 85 85 85 <ÄAC> 
14 15 15 15 <2C># 2570:089 154 1& 16 15 BE 05 05 <2A> 
BB 05 05 95 <28> 0698:05 85 16 51 52 52 53 1& <C4> 
15 16 15 1& <18> Bar: lh 14 92 92 92 95 92 95 <2B> 
sa 15 14 16 <84> BaAB:YZ2 92 95 95 15 16 16 16 <BR> 
1& 1& 1& 15 <97> DBEBR: 16 165 165 1& 85 85 85 85 <BC> 
16 14 16 14 <77> B4BB:B5 14 14 14 14 85 55 54 <CE> 
25 85 85 85 <38> BEC9:55 88 15 54 ACC Al 56 16 <S9B> 
14 1& 15 14 <B7> B4cB:1ö 14 92 95 92 92 95 Acc <55> 
16 16 16 16 <48> BADB:95 95 92 95 16 16 16 16 <2B> 
15 14 id 16 “DF> BsDe:i6 15 16 15 BB 05 05 85 <FCH 
is 15 154 165 <1B> BSEB:BS 1& ih 14 16 BE 44 4 <B7> 
ba 05 05 85 <7B> BAEB:58 85 14 54 IC Al 5a 14 <T6> 
16 16 15 15 <öäl> BEFB: 15 16 75 295975 57 <97> 
i& 15 14 1& <SZE> QAFB:F5S 95 95 92 14 14 14 16 £355> 
16 16 14 16 <SF> B7B@:1& 15 16 16 05 65 64 65 <82> 
16 1& 1& 14 <88> 0729:05 16 16 1& 16 05 69 äh <25> 
25 435 44 55 <20> 2718:5E BB 14 57 58 58 57 14 <F2> 
15 15 16 15 <B7> B718:1& 1& 92 95 92 92 92 92 SC2> 
15 15 15 14 <FB> 0728:92 92 72 14 156 14 15 1& <B2> 
1& 1& 14 14 <364> 0728:1& 154 156 14 BE 44 4C 48 <C1> 
15 15 15 15 {AB a758:28 16 15 15 15 B8 85 85 <CB> 
BE 556 AC 48 <FF> 8738:85 85 15 16 14 14 14 1& <79> 
s2 335 156 15 <SF> 274B0:1&4 14 92 4C 92 92 92 92 <5F> 
15 15 16 1& <Ca> 0748:972 92 92 15 15 16 14 1& <7E> 
72 95 14 14 <28> 2758:15 16 16 14 85 59 dh &B <ICc> 
15 16 14 15 <DO> 0758:05 16 14 15 14 85 05 85 <464> 
25 69 &h 6B <99> 2760:25 BE 16 B& 16 96 16 86 <11> 
4C 5a 14 14 “34> B7ös8:1& 16 95 92 95 92 95 72 <0O0> 
25 BA B5 Bü <SE> 2778:95 15 14 154 1& 165 14 14 <BD> 
73 75 92 1& <AC>H D77B:16 164 14 15 88 85 85 85 <9E> 
16 1& 16 16 <78> 2780:08 16 16 16 14 88 85 85 <IC> 
BB 05 85 85 <18> 2788:05 05 585 85 85 85 85 BB <> 








DB778:1& 
0798: 95 
Br7AB:1& 
D7AB:B5 
B7BO:B5 
D7Bd:1& 
B7CB: 1& 
B7CB:1& 
B37D9:08 
27D8:05 
B7EB:1& 
B7EB: 1& 
DBFFB: 14 
B7’F8:05 
gan: ih 
BEBB: 16 
B81B:1& 
Bald: lä 
2322: 08 
0828:1& 
28339: 1&5 
9838: 1& 
B840:1& 
2548: 35 


B550:55 1! 


n858:1& 
DE: 52 
0958:1& 
D270:08 
D378:55 
2980: 1& 
B888:4C 
23979:1& 
28789:05 
BBEAB: S& 
BaAB: DS 
BBBB:4C 
BBB8:1& 
B8C9:B8 
28C8:5% 


BED: 85 


BEDs: 4c 
BBERB:1& 
BBERB: 35 
DSFB:597 
Bars: DS 
0920:58 
BIBB: 1& 
0710:08 
BP18:1& 
9728:B& 
0928:1& 
28930: 1& 
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Des En I = | ee = Ä Mh = = ar == He — — I 
1078:92 95 92 922 5 ms Mi 9 <ZC> 1378:17 17 17 17 17 1578:0%4 D& Q& 085 05 085 06 B& “88> 
1880:1& 15 15 #72 92 95 95 92 <BB> 1388:17 17 17 17 85 1580:8& 285 85 05 06 D& B& 85 <S5B> 
1088:4C 92 92 92 92 16 16 94 <75> 1388: 17 17 17 17 17 1588:05 05 De B6& BA 85 05 85 <EC> 
1898:94 92 92 95 4 92 92 92 <ACH 1398:17 17 17 17 17 1698:0& 86 85 05 05 85 05 85 <3D> 
1898:972 72 95 92 92 16 164 16 <?21> 138: 7 So os 1598:05 05 85 85 85 085 85 85 <C4> 
18A0:92 92 1& 15 92 92 16 15 <öäF> 13A8:85 85 85 85 85 15AB:05 B5 85 85 05 85 85 85 <CC> 
‚imAs:1& 16 16 1& 1& 16 1& 92 <44> 13A8:05 55 05 55 55 1548:05 05 05 05 85 085 05 85 <D4> 
18B0:972 92 92 16 1& 1& 14 16 <iD> 13B8:85 55 05 85 85 ses eosoessoshs 5 35 85 <oc> 
1088: 14 94 92 95 95 95 92 16 <98> 13B8:05 85 05 55 os 15B8:05 05 085 56 85 B& 05 064 <F9> | 
18C09: 16 92 95 92 16 14 16 1& <57> 12:5 5 55 5 1&C0:85 84 85 BA 085 84 BS BA <42> 
10C8:16& 92 16 16 15 1& 1& 1& <C7> 15C98:85 55 85 55 85 15C8:05 96 85 56 05 05 05 B& <52> 
18D8:1& 15 16 16 1& 1& 165 1& <BR> 13D8:95 24 25 26 85 1&D8:05 B& BS5 D& 05 84 85 B& <12> 
10D8:92 92 14 1& 16 14 1& 1& <DS5> 15D8:25 26 85 55 085 150D8:95 B& 85 86 85 d& 085 84 <59> 
iBEB:1& 1& 92 92 92 16 16 16 <12> 13E0:05 55 05 2D ZE 15£0:05 O4 17 17 17 17 17 17 <BE> 
1BEB: 165 15 16 14 1& 1& 16 16 <07> 13E8:285 85 85 05 85 15E8:17 17 17 17 17 17 17 17 <135> 
IBFO: 14 15 14 15 15 16 16 1& <BF> 13F0:05 05 05 85 85 16F@:17 17 17 05 85 85 85 85 <EB> 
IBF8:16& 15 16 i6& 1& 14 14 15 <16> 13F8:85 77 28 29 05 16F8:17 17 17 17 17 17 17 17 <24> 
1180:1& i& 1& 1& 165 16 16 16 <28> 1490:28 297 05 05 85 1700:17 17 17 17 17 17 17 17 <aD> 
11B9:1& 16 16 16 16 15 14 16 <28> 14088:085 85 85 308 ac 1708:17 17 92 92 92 92 92 92 <B2> 
11i@r16 165 14 1& 15 14 15 1& <Fi> 1418:95 05 05 55 85 1710:72 92 92 92 972 92 92 92 <9F> 
1118:1& 1& 165 16 16 145 15 1& <{38> 1418:05 55 os 55 08 1718:92 92 92 05 55 08 85 85 <8D> 
1128:16 16 14 14 16 164 14 1& <40> 1420:05 2A 2B 2C 85 1720:92 92 92 92 972 92 92 92 <BE> 
1128:1& 1& 14 1& 15 1& 165 16 <46> 1428:2B 2C 05 55 85 1728:92 92 92 92 92 92 95 92 <SC> 
1138:15 i6 i& 15 1& 16 16 1& <4E> 1450:85 55 05 533 34 1730:92 92 92 95 95 4C 4C 4C <DD> 
1138:1& 16 14 14 1& 165 15 1& <{56> 1438: 5 05 So os 1738:95 95 95 95 95 92 95 95 <b4> 
1148:15 14 85 085 85 85 85 85 <> 1449:05 95 95 85 85 1749:95 95 92 05 85 85 85 85 <AB> 

1148:05 85 85 85 85 85 085 51 <Bö> 1448: 05 5 5 5 5 1748:9735 95 95 92 95 72 95 92 <A?» 

1158:52 52 52 52 52 52 52 52 <E9> 1450:05 55 85 85 85. 1750:95 95 95 92 A4C A4C Al 95 <A9> 
1159:52 52 52 53 85 DS 05 05 <a2> 1458:05 85 85 55 85 1758:92 92 95 95 95 4C 4C 40 <12> 
1152:85 85 85 05 85 85 85 85 <32> 1450:5 5 05 5 5 1760:92 92 95 92 95 92 95 95 <DD> 
1158:05 05 85 85 85 55 85 85 <8A> 1468:085 4C 085 05 08 1768:95 95 95 85 85 08 85 85 <EB> 
1178:05 85 85 05 85 85 85 53 <EI > 1470:05 085 05 05 ®5 1770:92 95 95 92 95 95 95 95 <9A> 
1178:4C AC ACC 4C ac ac Acc 4 <88> 1478:05 085 85 ac 05 1778:95 95 92 95 A4C Acc 40 95 <D1> 
1188:4C 4C 4C 56 85 65 85 85 <F5> 1480:05 4C 085 05 85 1780:95 92 92 95 95 4C 4C 40 <2B> 
1188:05 05 05 5 85 55 85 085 <AA> 1488:25 085 85 05 05 1788:95 975 95 95 95 92 95 92 <10> 
1199:05 85 85 985 85 55 85 85 <B2> 1490:05 085 05 55 &5 1799:92 95 95 05 55 85 85 85 <3S5> 
1178:05 85 85 085 04 04 04 54 <FB> 1498:05 85 28 085 55 1798:93 95 92 95 95 95 92 95 <Ac> 
11AB:4C AC 4C abc ac ac ac ac <AD> 14AQd:0dE 05 85 05 55 17AB:92 92 92 95 40 4C 40 92 <öb> 
11A8:4C 4C 4C 56 84 D4 04 085 <DF> 14A8:05 05 05 85 58 1748:95 92 92 95 95 95 95 95 <EB> 
15 5 5 5 5 ii <Dr> 14B0:85 85 85 55 95 17B0:95 95 95 92 95 95 95 92 <C4> 
1ı1B5s5Ss ss 555 5 55 5 05 <DA> 14B8:05 55 85 85 88 17B8:92 972 92 05 05 08 85 85 <ED> 
11C0:05 85 05 85 04 85 85 54 <29> 14C8:085 05 05 085 05 17C0:92 92 95 95 92 92 95 92 <SB> 
11CB:4C 46 4C 460 ACC 4C AC ACC <5B> 14C08:05 05 05 55 85 17C8:92 92 95 95 92 95 95 92 <Ch> 
11DB:4C 4C 4C 56 05 85 84 85 <ES> 14098:05 55 5 05 85 7: 5 PP sososos 5 55 <2A> 
11D8:85 85 85 85 85 855 85 85 <FA> 14 es 55 5 os 17De:05 85 85 85 05 05 85 85 <d6> 
11EB:85 85 8S 85 05 55 85 85 <i> 14E0:95 85 85 55 54 17E0:85 85 85 05 85 05 85 85 <dE> 
11EB: 085 85 05 85 84 085 05 57 <535> 14E8:05 05 08 85 05 17E8:05 05 85 85 55 85 85 85 <16> 
11F0:58 58 58 58 59 se 58 58 <ED> 14F0:08 285 05 55 55 17F0:85 85 05 85 85 85 085 85 <i1E> 
11F8:58 58 58 59 85 05 04 05 <26> 11ess5ss5 ss 8 17F8:05 85 85 06 05 86 85 Ba <3B> 
1790:05 05 DS 85 85 05 05 05 <24> 1500:05 05 5 55 5 1880:05 06 85 6 05 B& 85 Ba <85> 
1?08:05 85 285 85 85 85 05 085 <2CH 15988:05 55 05 4& 4C 1808:05 56 95 06 05 08 05 04 <95> 
1218:05 85 85 85 84 85 85 85 <2C> 1510:85 05 05 95 5 1810:85 84 85 04 85 Ba 85 Ba <95> 
1218:85 85 085 05 85 85 85 85 <IC> 1518:05 05 085 55 85 1818:05 B& 85 04 05 B& 05 84 <PDb> 
1220:05 05 05 85 085 585 84 85 <42> 20: 5 ss 55 18528:85 96 85 85 85 05 85 85 <98> 
1228:85 85 85 85 85 05 55 85 <äc> 1528:095 85 085 85 85 1823: 5 5 5 95 05 85 85 85 <58> 
17358:95 085 85 85 85 D4 Ba 84 <4D> 15358:95 85 05 697 &h 1830:05 85 85 05 85 85 85 85 <ö40> 
12358:84 94 D4 D4 94 04 04 84 <AC> 1538:05 085 08 05 5 1858:05 05 25 05 85 085 85 85 <68> 
1740:94 04 04 84 04 Da B4 94 <64> se: Bosse 5 1849: 85 85 85 05 05 85 85 85 <70> 
1248:04 84 94 B4 84 B4 04 84 <SCc> 1548:05 85 085 05 08 1848:05 85 17 17 17 17 17 17 <DA> 
12590:904 04 B4 84 04 B4 05 85 <77> ses osoesshsm 18598:17 17 17 17 17 17 17 17 <80> 
1258:05 85 05 085 05 84 05 85 <3598> 1558:95 55 85 85 85 1858:17 177 05 05 BB 55 85 <44> 
1250:05 085 85 85 84 85 55 85 <7C> 1558:85 85 05 85 85 1868: 17 17 17 17 17 17 17 17 <980> 
1268:85 85 95 B5 85 84 085 85 <98> 1568: 05 85 85 55 85 1858:17 17 17 17 17 17 17 17 <98> 
1270:05 05 05 55 95 85 84 85 <92> 1578:05 55 85 85 85 1878:17 17 85 05 05 85 95 05 <2E> 
1278:05 85 85 05 85 B4 05 85 <98> seosososeoe 1878:05 85 85 85 05 05 5 085 <A8> 
1288:085 85 85 51 57? a4 52 53 <B> 1580:05 B5 95 55 85 18898:05 85 85 085 2S 85 85 95 <BO+ 
1288:85 85 25 085 84 85 085 05 <A4> 15858:95 085 DB 05 85 1998 5 5 ibss 5 55 85 <B> 
1299:95 85 85 085 84 84 04 05 <Ab> Seas os 1ERRB:5 5 5 95 5 05 55 55 <cH> 
127e: 5 5 5 5 re 5 <7a> 1598:05 85 85 85 08 1898:05 085 85 24 85 D& 85 84 <DD> 
12A9:05 285 85 51 52 084 52 53 <ba> 15 ososshs es 18AB:85 B& 85 B& 05 04 95 Da <26> 
12A8:85 85 85 54 2D 2ZE 7F 5& <48> 15AB: 85 55 85 2D ZE 18A8:85 B& 85 06 85 DS 05 0% <I6> 
12B0:05 85 05 51 52 5 85 55 <35> 15B0:05 653 54 55 85 18B8:05 065 85 86 085 064 85 B& <36> 
12B8: 205 085 85 04 SA SB SC Ba <7C> 15B8:654 55 05 5 55 18B8:05 064 05 Ba 85 06 05 84 <3E> 
12C0:05 05 85 85 05 51 52 53 <FE> 15C0:05 55 05 55 44 18C0:05 06 85 85 05 85 85 85 <Z31> 
12C8:25 05 05 54 2D 2E ZF 56 <69> seco seosososı 18C8:05 85 85 85 085 05 05 85 <F8> 
12D0:05 85 85 54 30 351 32 S& <97> 15D8:05 85 85 358 4 1808:05 05 05 85 85 55 85 85 <FF> 
12D8:085 85 05 54 4C 56 05 085 <29> 15D8:05 46 A4C 58 85 18D8:85 85 85 85 85 85 05 85 <oa> 
12E8:095 85 05 84 SD SE SF 84 <CB> 15EB:4C 638 85 05 85 18E8:05 85 85 85 85 85 85 85 <i> 
12E8:205 85 85 85 85 54 4C 564 <28> 15E8:85 85 085 46 40 18E8:85 85 95 95 95 92 92 95 <äß> 
12F0:95 85 85 54 50 351 32 5& <BA> ıISSeos5Soseossses 18F0:95 92. 95 95 95 92 95 92 <EB> 
12F8:05 85 05 54 35 34 355 54 <CC> ı1SFB:05 55 85 35 34 18F8:92 92 92 95 95 95 92 95 <oA> 
1320:05 B5 085 57 58 597 05 85 <2B> 1580:95 59 &A 6B 85 1999:95 92 95 92 95 95 95 95 <F4> 
1398:25 85 05 04 60 &1 &2 B4 <27> 1sB8: äh Biss 1908:95 92 975 72 92 95 92 92 <SCc> 
1318:05 085 085 85 85 57 58 59 <76> 1510:05 55 05 649 6A 1918:75 972 92 92 95 95 92 92 <Sc> 
1318:05 085 85 54 335 34 35 56 <i> 1518:05 85 085 96 05 1918:975 95 95 92 92 95 95 95 <44> 
13720:295 85 85 57 58 58 58 59 <39> 1520:05 05 085 5 5 1920:95 92 92 95 95 95 95 972 <ä2> 
1328:05 05 085 85 85 85 85 385 <4E> sweosSososee 1928:972 92 95 95 95 95 92 95 <B> 
1338:285 85 85 05 84 84 84 05 <48> 1530: 25 85 85 085 85 1738:975 92 95 92 92 95 92 95 <A7> 
1338:95 05 25 85 05 85 85 85 <SE> 1538:95 85 85 85 85 1938:95 92 95 95 92 95 95 92 <95> 
1348:085 85 85 57 58 58 58 59 <S5A> 1649:05 5 55 5 55 1949:95 92 1& 16 14 14 15 92 <ac> 
ee 5 5 so 5 5 35 <hE> swseo5SoYosohe 1948:95 95 95 92 92 95 95 95 <94> 
1358:085 05 085 05 5 85 85 55 <76> 1558:85 85 85 85 85 19508:95 95 92 92 92 92 92 95 <99> 
1358:05 085 85 85 85 85 85 85 <FD> 158: 05 5 5 5 85! 1958:95 95 92 95 92 92 95 95 <C7> 
1358:05 085 85 85 085 85 85 85 <864> 1550:85 85 85 85 85 1750:975 92 975 95 95 92 95 95 <78> 
1368:05 85 085 85 085 05 05 85 <BE> 1558:85 BS 85 85 D4 1948:92 16 14 75 76 77 14 16 <453> 
13780:05 85 17 17 17 17 17 17 <B8> 1570:95 25 24 96 06 1970:95 95 95 1& 15 14 92 95 <47> 
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1iEEB: 14 
1EE8: 57 
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3400:B7 
S4CB: Ad 
3408: 17 
>4D8:B7 
S4EB: A5 
Z4EB: 77 
34F8:B9 
SAFB: As 
3580:D7 
3508:B?7 
3518: A4 
3518:37 
3528:B? 
3528: A353 
3538:053 
3558: 08 
3540:FA 
3548: A3 
3350:02 
3558:8D 
356509: A7 
3568: 8D 
3578: 9FA 
>378:D7 
3580: A? 
3588:D8 
>2590:C8 
3578: BE 
35Agd: 78 
S35AB: Al 
35B0:5D 
35B8:6508 
SsscH: ARE 
3508: 28 
35D8: AD 
3308: AZ 
S>5EB:8C 
33E8:D4 
S5SFB:i1& 
>S5F8:B7 
3620: A2 
308: 07 
3518:80 
3&18:EE 
34289: Bö 
3628:04 
36538:B8 
36358: A3 
36409: 83 
3648: A3 
BT ua 1, Dr 
3638: 24 
SAas0: A 
3568:52 
3670:52 
3478:52 
>590:52 
365898:008 
3490:32 
35598:1B 
S3ö5AB: 88 
SaoAg: Ba 
S&sBB: Da 
SuhBB: 25 


Sscd:E2 


35CH:C2 
3509: C2 
3&D8: 03 
56E9:B09 
5628: 008 
Ssäafb:c2 
bFSs:c2 
>729:00 
>78: 80 
3719:B8 
=>718:92 
37289:72 
3728: 4A 
3730:975 
3738:92 
3748:92 
3748:772 
3750:4D 
>738:192 
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3740:92 
3768:72 
3770:972 
=>7759:58 
3738:972 
3788:95 
>7970:95 
3778:16& 
37’Ad:58 
Sr’As: ld 
>7EB: 95 
37BB: 95 
37C8:95 
37CB: 72 
37Du:95 
3708: 75 
>7EB:92 
37E8: 75 
=>7’F8:95 
37F8:95 
3808: 75 
3808:95 
3818: 95 
3818: 95 
3828:972 
3328:95 
3838: 72 
3938: 92 
3840:1& 
3848: 1& 
39850: 975 
3838:975 
385B:72 
3968:72 
3578:72 
>878:75 
35998:51 
3888:95 
38970:72 
38%78:%75 
38AQB:52 
38A8: 54 
$8B2: #5 
38B8:51 
3B09:972 
33C8:1B 
>8D0:54 
538D8:1& 
>8EB:54 
38ER: 72 
38FB:i1E 
>8F8:54 
3728:75 
3908:54 
3719: 95 
39718:71 
39280:57 
3928:95 
3739:54 
3938:95 
3949:58 
3948:95 
39750: 95 
3958:57 
397408: 95 
39&8:#72 
3F78: 972 
3978: 95 
3788: 75 
3998:95 
39970:972 
39798: 972 
39rAB:972 
39AB:92 
39B8:1& 
39B8:972 
SFCQ: 95 
SICH: 95 
>97D9:92 
39Db8:1& 
SIEB: 75 
SYEB:9S 
S5F?FB:1& 
SI9FB:92 
SABB:1& 
SAaBe: id 
Sal: 16 
SsA1lB:15 
3A28:15 
SsAaza:1& 
A3B: 1 
SAsgB: ld 
ZAsB: 14 
3A48:1& 
3A58:15 
SA5B:1& 





Sabre 
Saas: ld 
SsA7B:1& 
3A78: 14 
SRBB: Ih 
388: 75 
3A7B: 008 
3A?F8:0B 
SAAg: 753 
SAAB: 14 
SABa: BF 
SaBs:B?F 
SACH: DO 
SACgB: DO 
ZADB: AD 
SADS: A? 
ShEB:Z2F 
SAE8S:DO 
SAFB:EB 
SAara:ıB2 
SBBA:5D 
3B88:14 
3BiB:C8 
3B13:08 
5B2B:98 
3B28: 88 
>B38:07 
3538: A979 
38429: AF 
>B48: 88 
>B59:91 
ZB58: 02 
3B&59: E97 
3B68: 05 
3Br72:A9 
SsB78:95 
3B88: 28 
3B98:82 
35B78: EB 
3B78:A5 
SBAB: 8D 
SBAB: 50 
3BBB:55 
5BB&:B? 
ZBCcH: AA 
3ECE: 32 
>BDB: AA 
3B08:38 
SBEB:8D 
5BE8: Da 
SBF3:5D 
SBFe:8D 
SCa0: AA 
>C983:82 
3C10:AB 
Ssc18:BF 
Ssc29:16 
3C78:55 
>C30:04 
S038:84 
>C49:05 
3Sc48: 41 
>C050:30 
Ssc58:11 
3C50:80 
5C58:09 
>Cc7B:25 
3C78:37 
ScBd: 22 
3058: 00 
3C989:2E 
SCre: 80 
SCAB: 27 
ScAB: 38 
>CBB: 80 
SCcB8: 33 
SCCO: 08 
>CC83:00 
5CcDB: 78 
>CD8:2F 
SCEB:ZF 
SCEB: 30 
SCFO: BE 
SCF8: 21 
3b229:98 
>08: 28 
30D10:39 
3018: 00 
>D2B: 00 
3D28: >34 
sDb39:2E 
S>D38:2F 
>D49:34 
3D48:27 
>D58: 22 
3058: 33 














>Dösg: 21 
3D&68:27 
SD7B: BE 
3078: 33 
3088: B0 
>D88: 18 
sDro: 21 
3078:37 
zbAg: 7a 
DAB: 47 
30B9:25 
3DBE: 08 
3DC8:D1 
3DC8: 16 
>DD8:1& 
3DD8:1& 
S3DE2: 14 
SDEB: BA 
SDFe:1& 
SDF8:1& 
3ER: 14 
S3EBEA: 14 
ZE10:4C 
3E18:1& 
3E2B: 14 
SE28: 95 
S3E3B: 14 
3E38:18 
SE4B: 15 
ZJE4B: 14 
SEsB: 72 
sE58:1& 
ZgEösB:1h 
SEAB: 72 
3E78: 14 
3E7’3:753 
3EB88: 15 
SEBSB: 14 
SErB: 92 
S3EFS:1l&A 
S3EAB: 75 
S3EAB: 15 
SEBB:1& 
SEB&:1& 
SECB: 15 
3ECB: 14 
3EDG: 92 
SEDE:F5 
SEEB: 14 
SJEE8:52 
SEFB: 48 
SEF&: 5 
SFBd:i& 
SFB8: 1& 
SF1B:52 
>F18:4B 
S3F20:92 
SF28: 14 
SF38B: 1& 
3F33:52 
SF48:4E 
SF48:1& 
SFS50: 1& 
3F58:14 
SF AB: 52 
3F&B: 16 
S3F7Bı id 
SF78:BB 
3F80:1& 
SF88:4C 
SF9B:1& 
>F978:2B 
SFAB: BE 
SFABri& 
3FBB:4C 
SFBB: 95 
SFCB: DE 
SFCB:i1l 
S3FD8:1& 
>FD8:4C 
SFEB: 72 
SFES: 11 
SFF@:1& 
3FF8:16 
ana: 58 
4993:52 
+2310:52 
+Q318:1& 
48328:52 
4978:1& 
49330:55 
4938:55 
4248: 15 
4249:55 
49502:1& 
4258:51 
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4969:85 
4058: 14 
4970:B5 
4978:51 
4008: 54 
4398:55 
40978: 15 
49978:55 
4A: 05 
493A8:37 
40B8: 05 
29E9:1& 
4909: 05 
43C06:05 
429D098:55 
+2308:55 
49EB:1& 
4BEB:55 
20F0:55 
4BFB:1& 
4199: B5 
4188: 14 
4119: 85 
4118:85 
4128:1& 
4128:55 
41393: 1& 
4138:55 
4140:57 
4149:1&6 
4159: 05 
4158: 1& 
41508:05 
41658: 15 
4170: 1& 
4178:58 


#180:16 | 


4188:58 
4170:1& 
4178:1& 


- 41AB: 15 


41A8:1& 
41E8:1& 
41B8:7F 
4108: 9A 
4109:05 
4108: 8A 
4108:8A 
41E8:82 
J1E89:Bi 
41F8: 88 
41F8:08 
4200:07 
429889: 06 
4218: BA 
4218:04 
4228:053 
4228:02 
4738: 01 
4738:00 
4240:95 
4248:56 
4258: AA 
4258: AA 
za: Ah 
42658:FF 
A27a:FF 
4778:55 
4280: EB 
4298:55 
+298:55 
4298:55 
HAB: SA 
szagı AA 
42B0: Ai 
42B8:56 
4260: Afı 
4208:685 
42DO: Fi 
4208: 73 
42EB:F3 
“?PES:CF 
42F0:55 
42F8: 00 
4588:3F 
4308:95 
4318:5% 
4318:55 
4329:53 
4520:55 
4330: 7B 
433B:B3 
4340: ED 


4548: 78 


4358: BE 
4358: 2D 


Inuadarannnd 
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"EFT 


HSHSAMBAMBSSHAFINSHHSHaR Su HNHn BARS 


BRSESTBARSEISSTENRSIE ER RE SS ANSR NER OC HERD UE RRÜHE FA 


2 
ÖD 


AA 


FB 





435B:FF 
43658: FF 
4370:FF 
4373:ı37 
4380:79 
4358: 78 
43F70:EE 
43578: EB 
43A2B:BB 
43AB:FF 
43BQ:FF 
45B8:FF 
45C0:E7 
4308: 797 
4300: 63 
4308: A5 
435E89:55 
43E8: 58 
43F8:BR 
43F8:BB 
4400: BE 
4499:5A 
4418: AF 
4418:F5 
4470:55 
4420: AF 
44530:55 
443G:FF 
4440: FF 
4448: FF 
4450: EA 
44,58: AF 
4450: FF 
44h8: EA 
4470: AF 
447B8:FF 
4489:55 
44389:55 
4499:55 
4498:A5 
44AB:FF 
44AB:5F 
4460: A5 
44B8: Ar 
44008:5F 
44C8: FF 
408: FF 
44D08:FF 
44EB:E7 
44E8: FF 
44F0:C3 
44FB:EF 
4500: FF 
4588: [03 
4510: AA 
4518: AA 
4520: AA 
45278: DA 
4530:EB 
4558:57 
4540:95 
4548: 7F 
4550: Fö 
4558:FF 
4550: FF 
4549: FF 
4570:96 
4578:00 
45908:54 
4588:F?7 
4370:655 
4599: &F 
45AD: Ah 
45ag: Ah 
45B9: Afı 
4568: AE 
4500: AA 
45CB:BE 
35D0:9E 
45D8:FF 
4SEB: SE 
4SEB: A 
45rß: Ar 
45FB: AA 
4hB0: Di 
4508: 6 
4610: 77 
4518:F5 
4529:5D 
428: 77 
4658: 00 
4538: BD0 
440: FF 
4548:00 


S8 


»Arax« (Schluß) 





&D 


<@a1> 
<EB> 
<42> 
<3F> 
<9D> 
<84> 
<AF> 
<FB> 
<B5> 
<9B> 
<aD> 
<34> 
<61> 
<71> 
<BB> 
<DD> 
<SE> 
<B> 
<Bö> 
<BA> 
«B1> 
<9B> 
<FB> 
<94> 
<54> 
<93> 
“a3F> 
<E?> 
<70> 
<22> 
<&2> 
<AD> 
<27> 
<49> 
<33> 
<SE> 
<47> 
<a1> 
<25> 
<SF> 
<BS5> 
<89> 
<44> 
<DB> 
<36> 
<&äb> 
<99> 
<ED> 
<86> 
<68> 
<DA> 
<D6> 
3D> 
<33> 
<DF> 
<68> 
<FD}> 
<AP> 
<15> 
<BC> 
<c4> 
EB} 
<FO> 
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Im Inneren des Computers 


Um die Atari-Computer vernünftig programmie- 
ren zu können, braucht man die Entwicklungsun- 
terlagen von Atari. Da diese nicht mehr erhältlich 
sind, haben wir für Sie die kompletten Hardware- 
Programmierunterlagen zusammengestellt. 
& sitzen vor Ihrem Computer und entwickeln Ihr neue- 

stes Programm. An einer Stelle muß das Programm 
unbedingt die Funktionstasten abfragen, wobei Sie in 
Basic den Befehl »PEEK« verwenden. Nur, welche Adresse 
muß beim »PEEK«-Befehl angegeben werden? Also geht 
die Suche nach Unterlagen los, in denen die Adressen der 
Funktionstasten stehen. Ganz nach dem Motto: »Da war 
doch mal was in einer Zeitschrift...«, oder: »Ich hab da doch 
mal ein Buch gelesen...«. 

Es gibt nun eine ganze Menge Literatur über die XU/XE- 
Computer. Leider ist in keinern Werk der gesamte Compu- 
ter in allen Einzelheiten beschrieben. Das eine Buch 
behandelt zum Beispiel die Player-Missile-Grafik sehr aus- 
führlich, dafür sind die Soundregister eher spärlich erklärt. 
Ein anderes behandelt diese genauer, verliert dafür aber 
kein Wort über die Display-List-Programmierung. Um ver- 
nünftig mit dem Computer arbeiten zu können, braucht 
man also immer mehrere Werke. Dabei blättert man sich 


die Finger wund, bis man eine brauchbare Beschreibung 
gefunden hat. 
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icher kommt Ihnen folgende Szene bekannt vor: Sie 








Atari veröffentlichte nun im Jahr 1979 für die alten 400er 
und 800er Computer sämtliche Programmierunterlagen. 
Darin enthalten waren das komplette dokumentierte 
Betriebssystem-Listing zusammen mit dessen Benutzer- 
handbuch sowie ein umfangreiches Werk, das sämtliche 
Hardwarebeschreibungen der Computer enthielt. Mit Hilfe 
dieser Unterlagen ließen sich professionelle Programme 
schreiben. Diese Unterlagen sind jedoch heute leider nicht 
mehr erhältlich. Einige Glückliche besitzen sie noch und 
hüten sie wie ihren Augapfel. 

So kommt es, daß viele Programmierer quite Ideen 
haben, diese aber wegen mangelhafter Kenntnis über die 
Hardware der Computer nicht umsetzen können. Da Atari 
glücklicherweise mit den neuen Computern zu den alten 
Geräten so kompatibel wie möglich geblieben ist, lassen 
sich die Hardwareunterlagen der alten Geräte ohne grö- 
Bere Probleme auch für die XU/XE-Computer einsetzen. 

Wir haben für Sie auf den folgenden Seiten diese Unter- 
lagen zusammengestellt, um Ihnen ein umfassendes 
Nachschlagewerk in die Hand zu geben, und damit Sie 
fortan Ihren fantastischen Atari-Computer besser nutzen. 

Die Übersicht ist in verschiedene Kategorien für die ein- 
zelnen Bereiche des Computers aufgeteilt. Fettgedruckt ist 
dann jeweils der Name des Registers und, falls vorhanden, 
der des entsprechenden Schattenregisters. Darunter befin- 
det sich ein Kasten mit der Registeraufteilung. Ein graues 
Raster signalisiert ein nicht verwendetes Bit. Jedes 
benutzte Bit ist numeriert und wird im anschließenden Text 
erklärt. 








Bildschirmsteuerung 


PAL 53268 ($D014): Fernsehnorm 





D3 D2 DI 


BER, 0 

Wett, ı 

Mit diesem Byte stellt ein Programm fest, ob es aufeinem 
amerikanischen oder deutschen XU/XE-Computer läuft. 


PAL (europäisches Fernsehsystem) 
NTSC (amerikanisches Fernsehsystem) 


VCOUNT 54283 ($D40B): Vertikaler Zeilenzähler 


le [s]%]®]e]elo 


In dieser Adresse zählt der Computer die Bildschirmzeile 
mit, in der sich der Elektronenstrahl des Bildschirms 
gerade befindet. Zu beachten ist dabei, daß in VCOUNT nur 
jede zweite Bildschirmzeile gezählt wird. 


WSYNC 54282 ($D40A): Warte auf horizontales Synchron- 
signal 


Jeder Befehl des Mikroprozessors, in diese Speicher- 
zelle zu schreiben, hält den Computer für die Dauer einer 
Bildschirmzeile an. Die Daten, die in dieses Register 
geschrieben werden, sind ohne Bedeutung. 





DMACTL 54272 ($D400): DMA-Kontrollregister 


Es» [elelefe 


schaltet den ANTIC ein 

wechselt die Auflösung der Player-Mlissile- 

Grafik. Wenn dieses Bit gelöscht ist, wird die 

zweizeilige Auflösung verwendet, sonst ist 

die einzeilige Auflösung eingeschaltet. 

B3 befiehlt dem ANTIC, aus dem Speicher 
Byte-Folgen ab der Adresse, die mit 
»PMBASE« definiert wurde, auszulesen und 
diese Byte auf dem Bildschirm darzustellen 
(Player DMA) 





B2 schaltet Missile DMA ein 

B1 BO Erklärung 

0 0 Bildschirmgrafik ıst abgeschaltet 

De Es wird ein schmaler Bildschirm mit 128 
Punkten bei ANTIC-Mode 14 generiert 

10 Es wird ein normal breiter Bildschirm gene- 
riert 

Te Es wird ein überbreiter Bildschirm mit 192 


Punkten beim ANTIC-Mode 14 generiert 
GRACTL 53277 ($D01D): Grafik-Kontrollregister 


BEE == | 5: | = 


B2 Bei gesetztem Bit wird ein Knopfdruck am 
Joystick zwischengespeichert 

B1 schaltet die Player ein 

BO schaltet die Missiles ein 


DLISTL 54274 ($D402): Low-Byte der Display-List-Adresse 
Schattenregister: SDLSTL 560 ($230) 





EAESEIEICICICIEN 





DLISTH 54275 ($D402): High-Byte der Display-List- 
Adresse 
Schattenregister: SDLSTH 561 ($231) 


[er [es | es |m4 | es | on | Bı | oo] 


Die Display-List ist eine Folge von Grafik-Instruktionen 
für den ANTIC-Coprozessor. Diese beiden Speicherstellen 
bestimmen, an welcher Stelle die Display-List steht. Man 
sollte die Speicherstellen nur mit ausgeschaltetem 
VBLANK-Interrupt verändern, da sonst ein Interrupt auftre- 
ten kann, während nur eine der beiden Speicherstellen ver- 
ändert ist. Indem Fallsucht der ANTIC in einem völlig unde- 
finierten Speicherbereich die Display-List, und der Bild- 
schirm fängt an zu flackern. 





CHBASE 54281 (D409): Startadresse des Zeichensatzes _ 
Schattenregister: CHBAS 756 ($2F4) 
40-Zeichen-Modus 





20-Zeichen-Modus 





In CHBASE steht das höherwertige Byte der Adresse des 
Zeichensatzes. Je nach verwendeter Zeichensatzgrafik 
muß der Zeichensatz am Beginn einer 1-KByte- bezie- 
hungsweise 512-Byte-Grenze stehen. Die ersten 1 oder 
2 Bit von CHBASE werden automatisch auf O gesetzt. 


CHACTL 53273 ($D401}: Steuerregister für den Zeichen- 
salz 
Schattenregister: CHART 755 ($2F3) 


BEE => | 5: |. so 


B2 Am Anfang einer Zeichensatzzeile wird 
dieses Bit abgefragt. Falls es gesetzt ist, 
werden alle Zeichen dieser Zeile auf den 
Kopf gestellt. 

Bi ist nur im 40-Zeichen-Modus aktiv. Falls 
dieses Bit gesetzt ist, werden alle Zeichen, 
deren Code ein gesetztes siebtes Bit hat, 
invers dargestellt. 

BO ist nur im 40-Zeichen-Modus aktiv. Falls 
dieses Bit gesetzt ist, werden alle Zeichen, 
deren Code ein gesetztes siebtes Bit hat, 
gelöscht. 


HSCROL 54276 ($D404): Horizontales Scrollregister 


Be ee ]o 


Die Display-List-Zeile, in der die horizontale Scroll- 
Option eingeschaltet ist, wird zwischen O0 und 15 Bild- 
schirmpunkte nach rechts verschoben. Zu beachten ist 
dabei, daß eine Verschiebung um einen Bildschirmpunkt 
zwei Punkten in Grafikstufe 8 entspricht. 

Falls horizontales Scrolling eingeschaltet ist, werden auf 
dem Bildschirm mehrere Bytes für eine Zeile benötigt 
(siehe auch »DMACIL«). Eine Bildschirmzeile des schma- 
len Bildschirms benötigt dabei so viele Bytes wie eine Zeile 
des normalen Bildschirms. Eine Standardbildschirmzeile 
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benötigt so viele Bytes wie eine erweiterte Bildschirmzeile. 
Bei der erweiterten Bildschirmzeile erhöht sich bei einge- 
schaltetem horizontalen Scrolling die Anzahl der Bytes pro 
Zeile nicht. 


VSCROL 54277 ($D405): Vertikales Scrollregister 
16-Zeilen ANTIC-Befehle 


Fe TeTe]o 


8-Zeilen ANTIC-Befehle 





4-Zeilen ANTIC-Befehle 


2-Zeilen ANTIC-Befehle 


ee ANTIC-Befehle 


Sämtliche Bildschirmzeilen, in der die vertikale Scroll- 
Option eingeschaltet ist, werden um die Anzahl der Zeilen, 
die in VSCROL definiert ist, nach oben geschoben. Die Zei- 
len werden ab dem ersten Display-List-Befehl, in dem die 
Option nicht eingeschaltet ist, nicht mehr verschoben. 


PRIOR 53275 ($DO1B): Priorität der Player/Missiles und 
Grafiken 
Schattenregister: GPRIOR 623 ($26F) 


»]e|e]e 





normale Grafik 

Wie in Grafikstufe 9 stehen 1 Farbe in 16 Hel- 
ligkeitsstufen zur Verfügung. Die Farbe wird 
mit Register »COLBK« definiert. 

9 frei definierbare Farben stehen wie in 
Grafikstufe 10 zur Verfügung. Die Farben 
werden mit den Registern »COLPMI« bis 
»COLPM3« sowie »COLPFO« bis »COLPF3« 
definiert. Die Hintergrundfarbe wird mit 
»GOLPMO« festgelegt. 

Wie in Grafikstufe 11 stehen 16 Farben einer 

Helligkeit zu Verfügung. Die Helligkeit wird 
mit »COLBK« festgelegt. 

Alle drei Stufen funktionieren nur mit einem Computer, 
der einen GTIA eingebaut hat. Ältere 400er und 800er 
Modelle hatten noch einen CTIA, bei dem diese Grafikstu- 
fen nicht funktionieren. Bei diesen Grafikstufen werden 
jeweils 4 Bildschirmpunkte des ANTIC-Modes 2, 3 oder 15 
genommen und zu einer Farbe zusammengefaßt. Deshalb 
haben diese Bits auch nur in diesen Grafikstufen eine Wir- 
kung. ANTIC-Mode 2 entspricht Grafikstufe 0 und ANTIC- 
Mode 15 Grafikstufe 8. ANTIC-Mode 3 ist im Basic und im 
Betriebssystem nicht eingebaut. 

B5 Multi-Color Player-Bit. Falls dieses gesetzt 
ist, werden die Farb-Bits von Player O0 und 
Player 1 sowie von Player 2 und Player 3 mit 
Exklusiv-Oder verknüpft. Auf diese Weise 
lassen sich in den Players 3 Farben dar- 
stellen. 
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BA 5. Player-Bit. Mit diesem Bit werden die Mis- 
siles 0 bis 3 zu einem Player zusammenge- 
faßt. Die Farbe dieses Players wird mit 
»COLPF3« bestimmt. 

B3 - BO Prioritäten der Player. Je nach dem gesetz- 
ten Bit wird ein Player von einem anderen 
oder von der Bildschirmgrafik verdeckt. Die 
Bits haben folgende Prioritätsreihenfolgen: 

B3=1 B2=1 Bi=1 BO=1 
FO PFO PO PO 
Fi Fi P1 Pi 
PO F2 FO P2 
P1 F3+P5 zu PS3 
P2 PO F2 FO 
P3 P1 F3+P5 Fi 
F2 P2 PZ F2 

F3+P5 3 P3 F3+P5 
BAK BAK BAK BAK 


»P« bedeutet Player und »F« Farbe. Die obersten Ta- 
belleneinträge sind dabei jeweils vor den untersten aufdem 
Bildschirm zu sehen. Falls Bit 3 gesetzt ist, verdeckt Player 
3 also Farbe 2, während bei gesetztem Bit 2 Farbe 2 Player 
3 verdeckt. Sind mehrere der Bits 0 bis 3 gesetzt, so wird 
auf dem Bildschirm der Bildschirmpunkt auf schwarz 
geschaltet, bei dem beide Fälle erfüllt sind. 


COLPFO 53270 ($D016): Farbregister 
Schattenregister: COLORO 708 ($2C4) 
COLPF1 53271 ($D017) 
Schattenregister: COLOR1 709 ($2C5) 
COLPF2 53272 ($D013) 
Schattenregister: COLOR2 710 ($2C6) 
COLPF3 53273 ($D019) 
Schattenregister: COLOR3 711 ($2C7) 


COLBK 53274 ($DO1A) 
Schattenregister: COLOR4 712 ($2C8) 
Mit B7 und B6 des Registers »PRIOR« gelöscht: 
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Mit mindestens einem von B7 oder B6 des Recgisters 
»PRIOR« gesetzt: 


= ]®[s]&]&]e]es]o 






B3 - BO bestimmen die Helligkeit einer Farbe in 8 
beziehungsweise 16 Stufen. B7 bis B4 
bestimmen den Farbton. 

B7 B6& B5 BA Farbton 

0 0 0 0 Grau (von Schwarz bis Weiß) 

0 0 0 1  Dunkelorange 

0 0 1 0 Rotorange 

el arzis;: 

O0 ı © 0 Violet 

0 1 08 1  Violettblau 

O0 ı 1 0 2 Blauviolett 

0 1 1 1  Veilchenblau 

ı 0 1 08°0 - Biau 

109 0 1  Königsblau 

1770,27 60 Grün 

1 0 1 1  Sattgrün 

ı 1 0 0 Grüngelb 

110 1 Olive 

ı 1 1 02 Braunorange 

1 1 1 1  Dunkelorange (wie Kombination 0001) 








Player und Missiles 


PMBASE 54279 ($D407): Startadresse des Player-Missile- 
Speicherbereichs 
Bei einzeiliger Auflösung 


# [%»]s]» |» DIE 
Bei zweizeiliger Auflösung 


| | |» ]& e DI 


Der Speicherbereich der Player-Missiles muß je nach 
Auflösung an einer 2-KByte- beziehungsweise 1-KByte- 
Grenze liegen. 





VDELAY 54276 ($DO1C): Verschiebt die Player-Missiles um 
eine Bildschirmzeile nach unten 


#1» |eje]sTelele 


verschiebt Player 3 





E verschiebt Player 2 
B5 verschiebt Player 1 
B4 verschiebt Player O 
B3 verschiebt Missile 3 
B2 verschiebt Missile 2 


B1 verschiebt Missile 1 
BO verschiebt Missile O 


Diese Speicherstelle wird dazu benutzt, die Players oder 
Missiles bei zweizeiliger Auflösung eine Bildschirmzeile 
nach unten zu verschieben. 


GRAFPO 53261 ($DO0D): Grafik der Player 
GRAFP1 53262 ($DOOE) 
GRAFP2 53263 ($DOOF) 
GRAFP3 53264 ($D010) 


er jo [es [ee jener ler [mo 


Das Bitmuster, das für die jeweiligen Players in die Spei- 
cherstellen übertragen wird, erscheint bei eingeschalteten 
Players, aber nicht aktiviertem Player-Missile-DMA (siehe 
»DMACTL«) auf dem Bildschirm. 





GRAFM 53265 ($DO11): Grafik der Missiles 
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B7’-B6 Bitmuster für Missile 3 
B5S - B4 Bitmuster für Missile 2 
B3-B2 Bitmuster für Missile 1 
B1-BoO Bitmuster für Missile O 


Wie bei»GRAFPO« bis »GRÄAFP3« erscheint das in diese 
Speicherstellen geschriebene Bitmuster für die Missiles 
auf dem Bildschirm, wenn die Missiles eingeschaltet, der 
Player-Missile-DMA aber ausgeschaltet ist (siehe 
»DMACTLe«). 


SIZEPO 53256 ($D008): Breite der Player 
SIZEP1 53257 ($D009) 
SIZEP2 53258 ($DO0A) 
SIZEP3 53259 ($DO0B) 


Breite 


0 0 normale Breite, jedes Bit des Players hat auf 
dem Bildschirm die Breite zweier Grafik- 
stufe-8-Punkte 

0 1 doppelte Breite der all 

10:0 normale Breite 

ie ri vierfache Breite 


Mit diesem Byte lassen sich die Bildschirmpunkte eines 
Players um das Zwei- oder Vierfache dehnen. 


SIZEM 53260 ($DO00C) 





B7’-B6 Breite von Missile 3 
B5 - B4 Breite von Missile 2 
B3-B2 Breite von Missile 1 
Bi-Bo Breite von Missile O 


Wie »SIZEPO« bis »SIZEP3« für jeden der vier Missiles. 


HPOSPO 53248 ($D000): Horizontale Position des Players 
HPOSP1 53249 ($D001) 
HPOSP2 53250 ($D002) 
HPOSP3 53251 ($D003) 
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Mit dieser Adresse wird die horizontale Position des 
jeweiligen Players festgelegt. Der Wert 48 ($30) entspricht 
dabei dem linken Rand eines normal breiten Bildchirms, 
208 ($D0O) dem rechten Rand. 





HPOSMO 53252 ($D004): Horizontale Position des Missiles 
HPOSM1 53253 ($D005) 
HPOSM2 53254 ($D006) 
HPOSM3 53255 ($D007) 
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Bestimmt die horizontale Position der Missiles auf dem 
Bildschirm. Die Werte entsprechen denen von »HPOSPO« 
bis »HPOSP3«. 





COLPMO 53266 ($D012): Farbe der Player-Missiles 
Schattenregister: PCOLRO 704 ($2C0) 


COLPM1 53267 ($D013) 
Schattenregister: PCOLR1 705 ($2C1) 


COLPM2 53268 ($D014) 
Schattenregister: PCOLR2 706 ($2C2) 


COLPM3 53269 ($D015) 
Schattenregister: PCOLR3 707 ($2C3) 


EACIEIEICIEN 


Diese Register bestimmen die Farben der Player (siehe 
auch »COLPFO« bis »COLPF3« und »COLBK«). 





MOPF 53248 ($D000): Kollision zwischen Missile und Bild- 
schirmgrafik 

MIPF 53249 ($D001) 

M2PF 53250 ($D002) 

M3PF 53251 ($D003) 








B3 entspricht COLPF3 
B2 entspricht COLPF2 
Bi entspricht COLPF1 
BO entspricht COLPFO 

Diese vier Register signalisieren eine Berührung zwi- 
schen einer Bildschirmgrafik und einer Missile. Welche 
Farbe die Missile berührt hat, bestimmt jeweils eins der vier 
Bits. Die Bits bleiben auch nach der Berührung gesetzt. 


POPF 53252 ($D004): Kollision zwischen Player und Bild- 
schirmgrafik 

PIPF 53253 ($D005) 

P2PF 53254 ($D006) 

P3PF 53255 ($D007) 


ME =: | e2 | 5: | 0 


MOPIL. 53256 ($D008): Kollision zwischen Missile und 
Player 

MiPL 53257 ($D009) 

M2PL 53258 ($DOOA) 

M3PL 53259 ($DOOB) 





POPL 53260 ($D00C): Kollision zweier Player 
PIPL 53261 ($DO0OD) 
P2PL 53262 ($DOOE) 
P3PL 53263 ($DOOF) 


BEHEEEEEE ©: | 22 | 5: | 


HITCLR 53278 ($DO1E): Löscht alle Bit der Kollisions- 
register. 


Da alle Kollisionsregister nach einer entsprechenden 
Berührung mit dem Objekt ihre Werte behalten, lassen sie 
sich mit diesem Register wieder löschen. Die Daten, die in 
dieses Register geschrieben werden, sind ohne Belang. 


Tonerzeugung 


AUDCTL 53768 ($D208): Sound-Kontrollregister 





#]e[®]e]®]e[e 


B7 Der 17-Bit-Zufallszahlenzähler wird in einen 9-Bit- 
Zähler verwandelt 

B6 Tonkanal 1 wird mit 1,79 MHz getaktet 

B5 Tonkanal 3 wird mit 1,79 MHz getaktet 

B4 Tonkanal 2 wird mit der Frequenz von Tonkanal 1 
getaktet 

B3 Tonkanal 4 wird mit der Frequenz von Tonkanal 3 
getaktet 

B2 Ein Hochpaßfilter mit der Eckfrequenz von Tonkanal 
3 wird in Tonkanal 1 eingefügt 

B1 Ein Hochpaßfilter mit der Eckfrequenz von Tonkanal 
4 wird in Tonkanal 2 eingefügt 

BO Alle Tonkanäle werden nicht mit 64 kHz, sondern mit 
15 kHz getaktet 


Mit diesem Register lassen sich verschiedene Klang- 
farben eines Tons erzeugen. Am besten probiert man mit 
den einzelnen Bits herum, um zu hörenswerten Ergebnis- 
sen zu kommen. 

Die oben gegebenen Frequenzen sind Annäherungs- 
werte. Die exakten Frequenzwerte lauten folgendermaßen: 
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angenäherte Frequenz exakte Frequenz 


1,79 MHz 1,78979 MHz 
64 KHz 63,921 KHz 
15 KHz 15,9803 KHz 


Eine ausgegebene Frequenz wird nach folgender For- 
mel berechnet: 

Ausgangsfrequenz = 
Registerwert + 1 

Der Registerwert entspricht dem Wert, der in die einzel- 
nen Register »AUDF1« bis »AUDF4« geschrieben wird. Falls 
eine höhere Taktfrequenz benutzt wird, muß eine andere 
Formel zur Berechnung der Tonfrequenz verwendet wer- 
den: 

Ausgangsfrequenz = Eingangsfrequenz / 2* (Register- 
wert + O) 

Wenn B3 oder B4 von »AUDCTL« 1 sind, wird »O« in der 
Formel zu 7, sonst wird »O« zu 4. 


Eingangsfrequenz / zweifacher 


AUDF1 53760 ($D200): Tonfrequenz 
AUDF2 53762 ($D202) 
AUDF3 53764 (5D204) 
AUDF4 53766 ($D206) 


EAESEIEIEICITEN 


In dieses Register wird ein Wert zwischen O und 255 
($00 - $FF) geschrieben, der die Frequenz eines Tons 
eines der vier Tonkanäle bestimmt. 





AUDC1 53761 ($D201): Lautstärke und Verzerrung des Tons 
AUDC2 53763 ($D203) 
AUDC3 53765 ($D205) 


AUDCA 53767 ($D207) 
EZCIESEIEIEIEIEN 
B6 B5 BA Erklärung 
0 0 0 02 Rauschen durch 5- und 17-Bit- 
Zufallsgenerator 
0 0 1ı 0 Rauschen mit 5-Bit-Zufallsgenerator 
0 1 0 0 Rauschen mit 4- und 5-Bit- 
Zufallsgenerator 
0 1 1 0 2 Rauschen mit 5-Bit-Zufallsgenerator 
(wie Kombination 0010) 
10 0 02 Rauschen mit 17-Bit-Zufallsgenerator 
I x 1 09 ReinerTon 
ı 1 0 0 2 Rauschen mit 4-Bit-Zufallsgenerator 
x x x 1 0 Kein Ion, nur Lautstärkewerte 


B3 bis BO enthalten einen Wert zwischen O und 15, der 
die Lautstärke des Tons bestimmt. Mit diesen Registern 
werden, ähnlich dem »SOUND«-Befehl in Basic, die Verzer- 
rung sowie die Lautstärke eines Tons festgelegt. 








Aus dieser Speicherstelle lassen sich Zufallszahlen in 
einem Bereich zwischen OÖ und 255 auslesen. B7 von 
»AUDCTL« verändert den Strom der Zufallszahlen. 


Interruptsfeverung 


NMIEN 54286 ($D40E): Schaltet NMIs ein und aus 





Display-List-Interrupts ermöglichen. Wenn dieses Bit 


B7 
gesetzt wird, kann vom ANTIC aus ein Display-List- 
Interrupt ausgelöst werden, 

B6 VBLANK-Interrupt ermöglichen. Falls dieses Bit 


gesetzt wird, löst der ANTIC bei jedem neuen Fern- 
sehbild einen Interrupt aus. 


NMIST 54287 ($D40F): Status der NMiIs 
REN 


Falls dieses Bit gesetzt ist, wurde vom ANTIC ein 
Display-List-Interrupt ausgelöst 


B6 Falls dieses Bit gesetzt ist, wurde vom ANTIG ein 
VBLANK-Interrupt ausgelöst 
B5S Dieses Bit signalisiert, daß auf der Tastatur der alten 


400er- und 800er-Computer die <SYSTEM 
RESET >-Taste gedrückt wurde. Da bei den XL/XE- 
Computern mit der <RESET>-Taste ein echter 
Reset des Mikroprozessors ausgelöst wird, hat die- 
ses Bit seine Bedeutung verloren. 


NMIRES 54287 ($D40F): Lösche Bit in »NMIST« 







Sobald der Mikroprozessor einen Schreibbefehl in diese 
Adresse ausführt, werden sämtliche Bits von »NMIST« 
gelöscht. Die geschriebenen Daten sind dabei ohne 
Belang. 


IRGEN 53774 ($D20E): Ermöglicht IRQs 
Schattenregister: POKMSK 16 ($10) 





B7 Es wird ein Interrupt ausgelöst, sobald die 
<BREAK>-Taste gedrückt wird 

B6& löst einen Interrupt aus, sobald irgendeine Taste der 
Tastatur gedrückt wird (siehe auch »CONSOL<«, 
»KBCODE« und »SKSTAT«) 

B5S ermöglicht einen Interrupt, sobald ein Byte am seriel- 
len Port eingelesen wurde 

B4 ermöglicht, von einem angeschlossenen Peripherie- 
gerät Daten anzufordern 

B3  lösteinen Interrupt aus, sobald alle Bit eines Byte zu 
einem angeschlossenem Peripheriegerät geschickt 
wurden 

B2 Zeitgeber-4-Interrupt einschalten 


Bi Zeitgeber-2-Interrupt einschalten 
BO Zeitgeber-1-Interrupt einschalten 


IROST 53774 ($D20E): Zeigt an, welcher Interrupt ausge- 
löst wurde 


DIESEIEIEIESEIE 


Die <BREAK>-Taste hat einen Interrupt ausgelöst 
Eine Taste der Tastatur hat einen Interrupt ausgelöst 
Ein Byte wurde fehlerfrei vom seriellen Prot gelesen 
Ein Peripheriegerät hat ein Byte angefordert 

Ein Byte wurde komplett an ein Peripheriegerät über- 
tragen 

Zeitgeber 4 hat einen Interrupt ausgelöst 

Bi Zeitgeber 2 hat einen Interrupt ausgelöst 

Zeitgeber 1 hat einen Interrupt ausgelöst 


Alle diese Interrupts werden durch einen IRQ am Mikro- 
prozessor ausgelöst. Über dieses Register stellt ein Pro- 
gramm fest, welcher der acht IROs ausgelöst wurde. 





STIMER 53769 ($D209): Starte Timer 


Über dieses Register werden die Timer des Computers 
gestartet. Als Timer fungieren die Register »AUDFi«, 
»AUDF2« und »AUDF4«. Erreichen die Timer den Wert 0, 
und sind die entsprechenden Bits im »IRQEN«-Register 
gesetzt, wird ein IRQ ausgelöst. Der Wert, der in dieses 
Register geschrieben wird, ist ohne Bedeutung. 


Tastatur 
CONSOL 53279 ($DO1F): Funktionstasten 
BE =: | = | 5 |] 


B3 Tastaturklick. In den alten 400er- und 800er-Compu- 
tern war ein Lautsprecher eingebaut. Dieser ließ sich 
mit diesem Bit ansprechen. Schreibt man hier also in 
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schneller Reihenfolge eine 0 und eine 1 hinein, ver- 
nimmt man einen Ton aus dem Lautsprecher. Beiden 


XU/XE-Computern wird kein Lautsprecher einge- | 


baut. Dafür hört man den Tastaturklick aus dem Laut- 
sprecher des Fernsehers oder Monitors. 

B2 Die <OPTION>-Taste wird gedrückt 

Bi Die <SELECT>-Taste wird gedrückt 

BO Die <START>-Taste wird gedrückt. 


Mit diesem Register werden die Funktionstasten abge- 
fragt. Normalerweise sind die Bits BO bis B2 auf 1 gesetzt. 
Erst wenn eine Taste gedrückt wird, ist das entsprechende 
Bit gelöscht. 


KBCODE 53769 ($D209): Tastaturcode 
Schattenregister: CH 764 ($2FC) 





D7 <CONTROL>-Taste 


D6 < SHIFT >-Taste 


Die restlichen 6 Bit werden nach folgendem Schema auf- 
geschlüsselt: 































<HELP> 
<0> 
«F3> 
<F4> 
<B> 
<X> 
<i> 
<4> 
<> 
<> 
<ESC> 
<5> 
<2> 
<i> 
ai 
<SPAGE> 


<INVERS> 
<A> 
<E> 
<Y > 
<TAB> 
<T> 
<> 
20> 
<9> 
<0> 
«’> 
<BACK SPACE > 











Die mit einem »*« gekennzeichneten Tasten erhalten kei- 
nen Tastaturcode, sondern werden vom Betriebssystem für 
spezielle Zwecke benötigt. Bit B7 und B6 lassen sich nur 
abfragen, wenn die <SHIFT> oder <CONTROL>-Täste 
zusammen mit einer anderen Taste gedrückt wird. 


Joystickanschlüsse 


PORTA 54016 ($D300) 

Schattenregister: STICKO 632 ($278): Joystickanschluß 1 
und 2 

STICK1 633 ($279) 

PTRIGO 636 ($27C) 

PTRIG1 637 ($27D) 

PTRIG2 638 ($27E) 

PTRIG3 639 ($27F) 

Für Joysticks 
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B7 „Joystick 2 nach rechts gedrückt 





B6 Joystick 2 nach links gedrückt 
B5S Joystick 2 nach hinten gedrückt 
B4 Joystick 2 nach vorne gedrückt 
B3 Joystick 1 nach rechts gedrückt 
B2 Joystick 1 nach links gedrückt 


B1 Joystick 1 nach hinten gedrückt 
BO Joystick 1 nach vorne gedrückt 


Für Drehregler 





B7 Feuerknopf Drehregler 3 


B6 Feuerknopf Drehregler 2 
B3 Feuerknopf Drehregler 1 
B2 Feuerknopf Drehregler 0 


Mit diesem Register lassen sich die Joysticks 1 und 2 
sowie die Drehregler 1, 2, 3 und 4 abfragen, sofern in 
»PACTL« B2 gesetzt ist. 


Falls B2 in »PACTL« gelöscht ist, wird mit dieser Adresse 
das Richtungsregister angesprochen. 
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Jedes Bit in diesem Register schaltet am Joystickport 
den betreffenden Pin als Eingang oder Ausgang. Ein 
gelöschtes Bit schaltet den Pin als Eingang und ein gesetz- 
tes Bit schaltet einen Ausgang. 





PACTL 54018 ($D302): Port A SonlLolregieler 

















B7 Dieses Bit läßt sich nur lesen. Es zeigt den Zustand 
des »Proceed«-Pins des seriellen Bus an. Wenn das 
Bit gesetzt ist, wurde von einem Peripheriegerät ein 
Interrupt ausgelöst. Das Bit läßt sich durch Lesen von 
»PORTA« wieder löschen. 


B& istimmer O0 
B5 ist immer 1 
B4 ist immer 1 


B3 kontrolliert den Motor vom Kassettenrecorder. Ist das 
Bit gelöscht, so ist der Motor eingeschaltet. 

schaltet bei »PORTA« zwischen dem Daten- und dem 
Richtungsregister hin und her. Wird das Bit gesetzt, 
so ist »PORTA« als Datenregister geschaltet. 

Bi istimmer O 

bestimmt, ob über den »Proceed«-Pin am seriellen 
Port ein Interrupt auftreten darf. Wenn das Bit gesetzt 
ist, wird ein Interrupt akzeptiert. 


PORTB 54017 ($D301): Banklogik 





B7 Wenn dieses Bit gesetzt ist, wird im Speicher zwi- 
schen $5000 und $57FF anstelle des RAM das 
Selbsttest-ROM eingeblendet 

ist nicht benutzt. 

hat nur beim 130XE eine Bedeutung. Wenn dieses Bit 
gesetzt ist, hat der ANTIC auf die zusätzlichen 64 
KByte RAM Zugriff. 


B4 hatnur beim 130XE eine Bedeutung. Wenn dieses Bit 
gesetztist, hat die CPU aufdie zusätzlichen 64 KByte 
RAM Zugriff. 
B2- haben ebenfalls nur beim 130XE eine Bedeutung. Mit 
B3 ihnen wählt man eine der zusätzlichen vier RAM- 
Bänke im Bereich von $4000 bis $7FFF aus. 
B3 B2 
0 0 RAM-Bank O 
0 1 RAM-Bank 1 
0 RAM-Bank 2 
ie 1 RAM-Bank 3 


B1 schaltet im Speicherbereich zwischen $A000 und 
$BFFF das Atari-Basic-ROM ein. Wird dieses Bit 
gesetzt, so wird das ROM eingeblendet. 

schaltet im Bereich zwischen $C000 und $CFFF 
sowie zwischen $D800 bis $FFFF das Betriebs- 
system-ROM ab und blendet das darunterliegende 
RAM ein. Wenn BO gelöscht ist, wird das ROM ausge- 
blendet. 


Bei den alten Atari 400er und 800er Computern werden 
hier die Joysticks und Drehregler von Port 3 und 4 abgefragt 
(siehe PORTA). 

Schattenregister: STICK2 634 ($27A) 
STICK3 635 ($27B) 
PTRIG4 640 ($280) 
PTRIGS 641 ($281) 
PTRIG6 642 ($282) 
PTRIG7 643 ($283) 


PBCT L 54019 EDaD2r Port B Kontrollregister 





B7 Dieses Bit läßt sich nur lesen. Wenn es gesetzt ist, 
wurde von einem Peripheriegerät am »Interrupt«-Pin 
des seriellen Bus ein Interrupt ausgelöst. Das Bit läßt 
sich durch Lesen von »PORTB« wieder löschen. 








B6 istimmer O 

B5 istimmer 1 

BA ist immer 1 

B3 zeigt den Zustand des »Command»-Pin am seriellen 
Bus an 

B2 wechselt bei »PORTB« zwischen dem Daten- und 


dem Richtungsregister. Wenn das Bit gesetzt ist, ist 
am »PORTB«-Register das Datenregister ansprech- 
bar. 

Bi istimmer O0 

BO ermöglicht einen Interrupt am »Interrupt»-Pin des 
seriellen Bus 


POTO 53760 ($D200): Drehreglereingänge 
Schattenregister: PADDLEO 624 ($270) 


POT1 53761 ($D201) 
Schattenregister: PADDLE1 625 ($271) 


POT2 53762 ($D202) 
Schattenregister: PADDLE2 626 ($272) 


POT3 53763 ($D203) 
Schattenregister: PADDLE3 627 ($273) 


POT4 53764 ($D204) 
Schattenregister: PADDLE4 628 ($274) 


POTS5 53765 ($D205) 
Schattenregister: PADDLES5 629 ($275) 


POTS6 53766 ($D206) 
Schattenregister: PADDLE6 630 ($276) 


POT7 53767 ($D207) 
Schattenregister: PADDLE7 631 ($277) 
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Mit diesen Registern wird der Wert der Drehregler abge- 
lesen. Der Wert liegt immer zwischen O und 228 ($0 - $E4). 
Die letzten vier Register haben bei den XU/XE-Computern 
keine Bedeutung, da bei diesen die Anschlüsse für die 
Drehregler nichtvorhanden sind. Der Wert in den einzelnen 
Registern ist erst nach 228 Fernsehzeilen auf dem Bild- 
schirm gültig (siehe auch »ALLPOT« und »POTGO«.). 





ALLPOT 53763 ($D208): Gültigkeit der Drehreglerwerte 
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Dieses Register wird ausgelesen, um festzustellen, ob 
der Wert eines Drehreglers einen stabilen Zustand erreicht 
hat. B7 entspricht Drehregler 7 und BO Drehregler 0. Ein 
gesetztes Bit zeigt einen gültigen Drehreglerwert an. 





POTGO 53771 ($D20B)}: Drehregler abfragen 

Mit diesem Register wird eine Abfragesequenz der Dreh- 
regler gestartet. Nach spätestens 228 Bildschirmzeilen ist 
die Sequenz beendet (siehe »ALLPOT«) und die Werte kön- 
nen aus »POTO« bis »POT7« gelesen werden. 


TRIGO 53264 ($D010): Feuerknöpfe der Joysticks 
Schattenregister: STRIGO 644 ($284) 


TRIG1 53265 ($D011) 
Schattenregister: STRIG1 645 ($285) 


TRIG2 53266 ($D012) 
Schattenregister: STRIG2 646 ($286) 


TRIG3 53267 ($D013) 
Schattenregister: STRIG3 647 ($287) 
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Diese Speicherstellen fragen die Feuerknöpfe der Joy- 
sticks ab. Immer wenn ein Knopf am Joystick gedrückt 
wurde, ist das Bit BO gelöscht. Wenn in dem Register 
»GRACIL« B2 gesetzt ist, speichern die Register den 
Druck des Joystick-Knopfs. Zurückgesetzt werden sie, 
indem B2 von »GRACTL« gelöscht wird (siehe auch 
»GRACTLe). 


PENH 54284 ($D40C): Lichtgriffel 
Schattenregister: LPENH 564 ($234) 
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Dieses Register liest die horizontale Position des Licht- 
griffels auf dem Bildschirm aus. Der Wert liegt zwischen O 
und 227 ($0 - $E3). Aufgrund eines Hardwarefehlers verän- 
dern sich die Werte in dem Register, wenn der Feuerknopf 
am Joystick gedrückt ist. Zuverlässig funktioniert der Licht- 
griffel nur bei dem amerikanischen NTSC-Fernsehsystem. 


PENV 54235 ($D40D): Lichtgriffel 
Schattenregister: LPENV 565 ($235) 
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Dieses Register gibt die vertikale Position eines Lichtgrif- 
fels auf dem Bildschirm an (siehe auch »PENH«). 





Serieller Port 


SKCT L 53775 ($D20F): Steuerung SEHEIDR Port 





schaltet den Pin »seriell En vom Port auf Masse 


B6 B5 BA 
E90 


Erklärung 


Ein- und Ausgabe von Daten werden mit 
einem externen Taktsignal an »Clock in« 
vom seriellen Port gesteuert 

Ausgabe von Daten wird mit einem externen 
Takt an »Clock in« gesteuert. Bei der Daten- 
eingabe übernimmt der Computer die Daten 
im Takt des Tonkanals 4. 

Ein- und Ausgabe von Daten erfolgt im Takt 
des Tonkanals 4. Der Takt steht am »Clock 
out«-Pin des seriellen Port zur Verfügung. 


Daten werden im Takt des Tonkanals 4 aus- 
gegeben. Dateneingabe erfolgt über einen 
externen Taktgeber am »Clock in«-Pin des 
seriellen Port. 


—.. 
O 
sk 


Datenausgabe erfolgt im Takt des Tonkanals 
2. Dateneingabe erfolgt im Takt des Tonka- 
nals 4, wobei der Takt am »Clock out«-Pin 
des seriellen Port zur Verfügung steht. 
Datenausgabe erfolgt im Takt des Tonkanals 
2, Dateneingabe im Takt des Tonkanals 4. Es 
steht kein Taktsignal zur Verfügung. 


setzt die Zweiton-Datenübertragung (wird beim Kas- 
settenrecorder benutzt) anstelle einer digitalen 
Datenübertragung. Die zwei Töne werden mit Tonka- 
nal 1 und 2 erzeugt. 
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B2 Mit diesem Bit wird die schnelle Abfrage der Dreh- 
regleranschlüsse eingeleitet. Anstelle von 228 Zeilen 
lassen sich die »POT«-Register schon nach zwei Bild- 
schirmzeilen auslesen. 

Bi schaltet die Tastatur-Abfrage ein 

Bi schaltet die Tastatur-Entprellung ein 

Wenn BO und B1 gelöscht sind, führt der POKEY eine 

Selbsttest-Routine aus. 


SKSTAT 53775 ($D20OF): Status des seriellen Port 


GOOCOOoDıE 


Wenn dieses Bit gelöscht ist, wurde ein Byte von 
einem Peripheriegerät zum Computer gesendet, 
während dieser das letzte noch nicht verarbeitet hat 

B6 \Wenndieses Bit gelöscht ist, wollte der Computer ein 
weiteres Byte senden, während das vorige noch nicht 
komplett zum Peripheriegerät geschickt wurde 

B5 Dieses Bit zeigt bei gelöschtem Zustand an, daß auf 
der Tastatur zu schnell hintereinander Tasten 
gedrückt wurden 

B4 ist direkt mit dem »Seriell In«-Pin des seriellen Port 
verbunden 

B3 Wenn eine der beiden <SHIFT >-Tasten gedrückt 
sind, wird dieses Bit gelöscht 

B2 Eine Taste auf der Tastatur ist immer noch gedrückt. 

Bi zeigt bei gelöschtem Zustand an, daß der Computer 

gerade ein Byte von einem Peripheriegerätempfängt 

ist immer 1 





BO 


SKRES 53770 ($D20A) 


a 


Wenn die CPU einen Schreibbefehl in dieses Register 
ausführt, werden alle Bits von »SKSTAl« gelöscht. Die 
Daten, die in das Register geschrieben werden, sind ohne 
Bedeutung. 


SERIN 53774 ($D20E): Serielles Empfangsregister 


[er [os es [es | es | e2 | er | eo 





Der Computer empfängt von einem Peripheriegerät 
seriell einzelne Bits eines Byte. Nach der Übertragung 
steht das übertragene Byte in diesem Register zur Ver- 
fügung. 


SEROUT 53773 ($D20D): Serielles Senderegister 


@le]s[e|mje]o] 


In dieses Register schreibt der Computer ein Byte, das 
seriell zu den Peripheriegeräten übertragen wird. 

Mit diesen neun Seiten wäre der komplette Computer 
beschrieben. Wie auch anderswo macht nur die Übung den 
Meister. Sie sollten also ausgiebig mit den Registern expe- 
rimentieren. Erst dann wir auch ersichtlich, welches Poten- 
tial in dem kleinen Computer steckt. Wahrscheinlich wer- 
den Sie nach kurzer Zeit die Fähigkeiten Ihres Gerätes 
nicht mehr missen wollen. Gerade wenn Sie auf einen 





anderen Computer umsteigen, werden Ihnen sicherlich die 
vielen Funktionen der XL/XE-Computer fehlen. Auf der fol- 
genden Seite sind noch einmal sämtliche Register sowie 
deren Schattenregister in alphabetischer Reihenfolge 
zusammengestellt. 













Die Register in alphabetischer Reihenfolge 


Hardware-Register Schattenregister Hardware-Reg ister Schattenregister 
Adresse Adresse Adresse Adresse 


Name Beschreibung Hex Dez Name Hex Dez Beschreibung & 
ALLPOT Abfrage ob alle Drehegler D208 Kollision Missile 1-Bild- Do0t 53249 























































fertig gelesen schirmgrafik 

AUDCI Tonkanal 1 Kontroll- D201 53761 | M2PF _ Kollision Missile 2-Bild- D002 53250 7 
register | schirmgrafik 

AUBCG2  Tonkanal 2 Kontroll- D203 53763 | MSPF Kollision Missile 3-Bild- D003 53251 
register | schirmgrafik 

AUDC3  Tonkanal 3 Kontroll- D205 53765 


Kollision Missile O-Player 
MIPL Kollision Missile 1-Player 
MZPL Kollision Missile 2-Player 


Ä register 
Tonkanal 4 Kontroll- 










AUDCA 














register D208 53768 M3PL _ Kollision Missile 3-Player DA 
Fe ne _ D200 53760 NMIEN  NMI Kontrollregister DAUE 54286 
Tönkanal 1 NMIRES Löscht NMIST DA0F 54287 
NMI Statusregister 


AUDF2 Frequenz von D202 53762 
Tonkanal 2 Kollision Player O-Bild- 


schirmgrafik 

















































ZUDES er von Ba 53764 PIPF Kollision Player 1-Bil- D005 53253 
| GRRaTEN 4 schirmgrafik 
spe: Em BZ0GZ 53766 P2PF Kollision Player 2-Bil- DO006 53254 
> schirmgrafik 
CHACTL Zeichensatz Kontroll- DA4a01 54273 CHART 2F3 7755 FR 4 
register D409 54281 CHBASE 2Fa 756 P3PF Kollision Player 3-Bild- DOO? 53255 


CHBASE Zeichensatz Adreßregister schirmgrafik 


Kollision Player O-Player 


| CoL8Kk Rahmenfarbe DOIA 53274 COLOR4 2C8 712 er, 
COLPFO Zeichenfarbe 0 DO16 53270 COLORO 2C4 708 = Perl => as 
COLPFI Zeichenfarbe 1 D017 53271 COLORI 2C5 709 ye Ye 


Kollision Player 3-Player 
PACTL Port A Kontrollregister D302 54018 











| COLPF2 Zeichenfarbe 2 DO18 
COLPF3 Zeichenfarbe 3 


































































: PAL Fernsehnorm D014 53268 
| COLPMO nn Player- bDoi2 53266 PCOLRO 200 704 PBCTL Port B Kontrollregister 0303 54019 
COLPMI Farbe von Player- D013 53267 PCOLRI 2C1 705 u orizontale Position nz rn 
Missile 1 | f des Lichtgriffels Dn- 
COLPM2 Farbe von Player- D0O14 53268 PCOLR2 2C2 706  PENY — Vertikale Position 54285 LPENY 235 565 
t Missile 2 des Lichtgriffels 
COLPM3 Farbe von Player- D015 53269 PCOLR3 2C3 707 Adresse das Player- SB 
Missile 3 | PORTA nes eh A D300 54016 
A resse von Port 
GONSOL Register der DOIF 53279 | 
Funktianstasien PORTB Adresse von Port B D301 54017 
DLISTH höherwertiges Byte der DA03 54275 SDLSTH 231 561 POTO Drehregler O0 
Display-List POTI Drehregler 1 D201 5361 PADDLI 271 625 
DLISTL niederwertiges Byte der D402 54274 SDLSTL 230 560 Drehregler 2 | 
f Display-List Drehregler 3 


Drehregler 4 D204 53764 PADDLA 274 630 

Drehregler 5 D205 53765 PADDLS 275 63 
POT& Drehregler 6 53766 PADDL6G 2765 632 
Drehregler 7 PADDL7 


DMACTL DMA Kontroöllregister 
GRACTL Grafik Kontrollregister DD 53277 
GRAFM Grafik der Missiles Do 53265 
| GRAFPO Grafik von Player 0 DOOD 53261 






























































GRAFP1 Grafik von Player 1 DODE 53262 POIGO Starte Drehregler Abfrage D20B 53771 
GRAFP2 Grafik von Player 2 DOOF 53263 PRIOR Prioritätsregister DOIB 53275 GPRIOR 26F 623 
GRAFPS3 Grafik von Player 3 DO 53264 RANDOM Zufallszahlengenerator 

SERIN  Serieller Eingabe-Port 


HITCLR Lösche alle Kollisions- DYIE 53278 


register SEROUT Serieller Port Ausgabe- 
















Horizontale Position von DO04 register 
Missile O | SIZEM Größe der Missiles DOOG 53260 
' HPOMI Horizontale Position von DO05 53253 ı SIZEPO Größe Player 0 DOoos8 53256 
Missile 1 ı SIZEP1 Größe Player 1  D00: 
I onz sr A SIZEP2 Größe Player 2 DO0A 53258 
- : - SIZEP3 Größe Player 3 DO0OB 53259 
HPOM3 Horizontale Positionvon DO07 53255 SKCTL  Serieller Port Kontroll- D20F SSKCTHL 232 562 
Missile 3 register 































_ HPOSPO Horizontale Position von SKREST, Löscht SKSTAT 
Player O : 
| id “ | | SKSTAT Serieller Port Status D20F 
HPOSP1 re Position von DO01 53249 STIMER Starte Timer D209 53769 | 
ar in TRIGO  Feuerknopf Joystick 0 DO010 53264 STRIGO 284 644 
HPOSP2 a Position von DO02 53250 TRIGI _Feuerknopf Joystick 1 
HPOSP3 Horizontale Position von DO03 53251 TRIG2  Feuerknopf Joystick 2 DO12 53266 STRIG2 286 646 



























Player 3 | TRIGS  Feuerknopf Joystick 3 D013 53267 STRIG3 285 647 
HSCGROL Horizontales Feinscroll- 54276 MEOURE a nn. DauB 54283 
Register | un ae j 
IRQEN IRQ Kontrollregister D20E 53774 POKMSK 10 16 ze aeg Elayer-Missiles EEE =1276 
IROST IRQ Statusregister D20E 53774 | pn 
KBCODE Tastaturcode 53/769 CH 2FC 764 _ VSCROL Vertikales Feinscroll- 
Fe Bee 3a : register 
| MOPF Kollısıon Missile O-Bild- : 
schirmgrafik WSYNC Warte auf vertikales D40A 54282 


Synchronsignal 
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Grafikzauberei 


Is Atari die 8-Bit-Computer ent- 
AA: wollte man ein mög- 

lichst leistungsstarkes Gerät 
auf den Markt bringen. Zum damali- 
gen Zeitpunkt war dies nur durch 
Hardware möglich, die den Mikropro- 
zessor des Computers soweit wie 
möglich entlastet. Also ersannen die 
Entwickler des Computers drei spe- 
zielle Chips. Zwei dieser Bausteine 
haben die Aufgabe, den Ton im Com- 
puter zu erzeugen, die Tastatur abzu- 
fragen und mit angeschlossenen Peri- 
pheriegeräten in Verbindung zu tre- 
ten. Der dritte Chip ist speziell für die 
Grafik verantwortlich und trägt den 
Namen »ANTIC«, »Alpha Numeric 
Television Interface Chip«. 

Dieser Baustein ist ein kompletter 
kleiner Mikroprozessor mit einer eige- 
nen Programmiersprache. Die Be- 
fehle dieser Programmiersprache 
bestimmen, welche Grafik man auf 
dem Bildschirm sieht. Ein in dieser 
Programmiersprache geschriebenes 
Programm nennt man »Display-List«. 
Die Display-List steht dabei an beliebi- 
ger Stelle im Computerspeicher, 
wobei dem ANTIC vom 6502-Prozes- 
sor mitgeteilt wird, wo sich die Display- 
List befindet. Der ANTIC liest dann 
genau wie ein richtiger Mikroprozes- 
sor Befehl auf Befehl aus dem Spei- 
cher. Jeder einzelne dieser Befehle 





Ein Prozessor 
namens ANTIC... 


stellt eine bestimmte Grafik-Betriebs- 
art dar. Wenn Sie den Computer zum 
Beispiel einschalten, haben Sie den 
ganz normalen blauen Bildschirm vor 
sich. Damit lassen sich 24 Zeilen aus- 
geben. Für jede dieser 24 Zeilen steht 
ein Befehl in der Display-List, der 
besagt, daß jetzt eine Zeile mit 40 nor- 
malen Zeichen dargestellt werden 
soll. In der Grafikstufe 2 lassen sich 
dagegen zehn Zeilen mit doppelt so 
hohen Zeichen sowie vier Zeilen mit 
normalen Zeichen abbilden. Die 
Display-List besteht hier aus zehn 
Befehlen für die Zeichen mit doppelter 
Höhe und vier Befehlen für die norma- 
len Zeichen. Jedesmal, wenn Sie 
unter Basic einen neuen Grafik-Befehl 
eintippen, wird dem ANTIC einfach 
nur eine neue Display-List übergeben. 

Es existieren drei verschiedene 
Arten von Befehlen in der Display-List. 
Die erste Art sagt dem ANTIC, daß er 
jetzt eine bestimmte Grafikstufe gene- 
rieren muß. In dieser Art sind alle 
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In die Atari-Computer ist ein 
spezieller Mikroprozssor einge- 
baut, der die gesamte Grafik- 
steuerung des Computers über- 
nimmt. Mit ein paar Kenntnis- 
sen über die Funktionsweise 
des Bausteins lassen sich 
wahre Grafikwunder auf dem 
Bildschirm erzeugen. 


Befehle enthalten, die auf dem Bild- 
schirm eine Grafik in einer wie auch 
immer gearteten Form erzeugen. Je 
nach Grafikbefehl für den ANTIC weiß 
dieser auch gleichzeitig, wie viele 










D402 
DLISTH 54275 D403 
DMACTL 54272 . D400 
SDLSTL 560 230 


Bytes er aus dem Speicher holen muß 
und wie er diese Bytes zu interpretie- 
ren hat. Zum Beispiel muß er bei der 
Grafikstufe 8 insgesamt 40 Byte aus 
dem Speicher lesen. Die einzelnen 
Bits der Bytes verwendet er dann 
dazu, auf dem Bildschirm ein Punkte- 
muster zu erzeugen, jedes gesetzte 
Bit läßt einen Punkt aufleuchten. Stößt 
er dagegen auf einen Befehl, der ein 
Zeichen auf dem Bildschirm darstel- 
len soll, so holt er sich zunächst auch 
40 Byte aus dem Speicher. Jedes die- 
ser Bytes sagt dem ANTIC die Num- 
mer des Zeichens, für das das Byte im 
Speicher steht und das auf dem Bild- 
schirm dargestellt werden soll. Dar- 
aufhin liest er 8 weitere Bytes und 
interpretiert die Bits dieser Bytes als 
Punktemuster. Auf diese Weise wird 
ein Zeichen auf dem Bildschirm dar- 
gestellt. 


>. ‚ein »Display -List«=- 


Programm 


Von diesen Grafikbefehlen gibt es 
16 verschiedene Arten. Mit den letzten 
15 lassen sich die verschiedensten 
Grafikstufen auf dem Bildschirm 


erzeugen. Die erste ist jedoch einzig 
und allein dazu da, Leerzeilen auf den 
Bildschirm zu bringen. Im deutschen 
PAL-Fernsehsystem stehen 625 Fern- 
sehzeilen zur Verfügung. Da aber 
jedes zweite Bild praktisch dem ersten 
entspricht, halbiert sich diese Zeilen- 





Systemadressen für Display-Lists 





zahl auf 312,5. Würde der ANTIC nun 
gleich in der ersten Zeile mit dem Bild- 
schirmaufbau beginnen, so würde 
man gut und gerne das oberste Viertel 
des Bildes auf dem Bildschirm nicht 
sehen. Vielleicht kennen Sie den 
Effekt, wenn Sie noch einen alten 
Fernseher besitzen, der nicht korrekt 
eingestellt ist, und bei dem das Bild 
ein wenig zu tief sitzt. Dort sehen Sie 
dann einen schwarzen Balken, indem 
einige Zeilen wild flimmern. Dieser 
Balken sollte normalerweise nicht 
sichtbar sein, da er so weit nach oben 
verschoben ist, daß er nicht mehr das 
Bild verunziert. Worauf es aber 
ankommt: Dieser Balken besteht aus 





Low-Byte Startadresse Display-List 
High-Byte Startadresse Display-List 
schaltet ANTIC ein und aus 
Schattenregister von DLISTL 
Schaftenregister von DLISTH 
Schattenregister von DMACTL 


den ersten Fernsehzeilen. Wenn der 
ANTIC also gleich in der ersten Fern- 
sehzeile mit dem Bildschirmaufbau 
beginnen würde, wäre der Anfang des 
Bildes dort, wo normalerweise dieser 
schwarze Balken sitzt, nämlich außer- 
halb des Bildschirms. Aus diesem 
Grund gibt es für den ANTIC Befehle, 
die nichts weiter verrichten, als den 
Bildschirm mit schwarzen Zeilen zu 
füllen. Dadurch läßt sich auf einfache 
Weise softwaremäßig ein Bild nach 
oben oder unten verschieben, man 
muß nur die entsprechende Anzahl an 
Leerzeilen einfügen oder entfernen. 
Von diesen sogenannten »Blank-Line- 
Befehlen« gibt es insgesamt acht 
Stück, sie erzeugen eine bis achtleere 
Zeilen auf dem Bildschirm. Eine nor- 
male Display-List besitzt am Anfang 
immer drei Befehle, die jeweils acht 
Blank-Lines erzeugen, insgesamt 
sind das 24 Leerzeilen. 

Die zweite Befehlsgruppe umfaßt 
die Befehle, die dem ANTIC mitteilen, 
von woher er die Daten holen soll, aus 
denen er die Bildschirmgrafik aufbaut. 
Eigentlich ist dies gar keine eigene 
Befehlsgruppe, denn im ANTIC sind 
diese Befehle so gelöst, daß ein Gra- 
fikbefehl auch gleichzeitig ein Befehl 
zum Ädressieren der Bildschirmgrafik 
sein kann. Der Unterschied liegt darin, 
daß in dem Grafikbefehl ein weiteres 
Bit gesetzt ist, das dem ANTIC mitteilt, 
daß jetzt ein Befehl zum Bestimmen 
der Adresse der Bildschirmgrafik 
kommt. Außerdem besteht solch ein 








Befehl nicht aus einem, sondern aus 
drei Byte, dem Byte für die Grafikstufe, 
sowie zwei Byte, die die Adresse 
bestimmen, ab der der Computer die 
Byte für die Bildschirmgrafik holt. Die- 
ser Befehl hat noch eine weitere Funk- 
tion. Aufgrund der inneren Konstruk- 
tion des ANTIC kann ein zusammen- 
hängender Bildschirmspeicher maxi- 


wird, haben die Entwickler des ANTIC 
den Sprungbefehl eingebaut. Und wie 
bei jedem guten Mikroprozessor gibt 
es auch beim ANTIC bedingte und 
unbedingte Sprünge. Die unbeding- 
ten Sprungbefehlte verknüpfen ein- 
fach mehrere Display-Lists miteinan- 
der. Diese lassen sich also völlig wırr 


im Speicher verteilen. Sobald der 


ANTIC-Befehle 


Horizontales Scrolling 


BSRZESESEERSESEE 


Veriies Serting 1] che 1 Part Behed] Prbei 
[onancresseresüogen ||| | bebebechel |] | borbebeche 


Sen nl En2sn as 


1 Leerzeile 
2 Leerzeilen 
3 Leerzeilen 
4 Leerzeilen 
5 Leerzeilen 
6 Leerzeilen 
7 Leerzeilen 
8 Leerzeilen 


Sprunganweisung 2| 
Springe und warte auf neues Bild ci 


Normaler Zeichensatz (GR. 0) 
Zeichensatz mit Unterlänge 
Farbzeichensatz (GR. 12) 
Farbzeichensatz (GR. 13) 
Doppelt breite Zeichen (GR. 1) 
| Doppelt breite Zeichen (GR. 2) 


Grafik (GR. 3) 
Grafik (GR. 4) 
Grafik (GR. 5) 
Grafik (GR. 6) 
Grafik (GR. 14) 
Grafik (GR. 7) 
Grafik (GR. 15) 
Grafik (GR. 8) 


mal nur vier KByte lang sein. Es gibt 
aber Grafikstufen, die wesentlich 
mehr als vier KByte Bildschirmspei- 
cher verbrauchen. Grafikstufe 8 benö- 
tigt zum Beispiel einen Bildschirm- 
speicher von über sieben KByte. In 
solchen Fällen wird in der Display-List 
einfach immer dann ein neuer Spei- 
cherbeginn angegeben, wenn der 
ANTIC die 4-KByte-Grenze über- 
schreitet. Übrigens wird dieser Befehl 
auch benutzt, um die Bildschirme in 
unserem 256-Farben-Programm 
umzuschalten. Bei diesem Programm 
wird alle 50stel Sekunde zwischen 
zwei Bildschirmen hin- und herge- 
schaltet. Dies geschieht, indem eine 
VBLANK-Routine periodisch in die 
Display-List die beiden Startadressen 
der beiden Speicherbereiche 
schreibt. 

Die dritte Befehlsgruppe der Dis- 
play-List-Befehle umfaßt die Sprung- 
befehle. Ähnlich wie beim maximalen 
Bildschirmspeicher darf die Display- 
List nicht länger als 1 KByte sein. Da 
es vorkommt, daß sie doch mal länger 








ANTIC auf einen derartigen Befehl 
stößt, springt er sofort zu der Adresse, 
die hinter dem Befehl angegeben ist. 
Deshalb ist der unbedingte Sprungbe- 
fehl auch 3 Byte lang. Der bedingte 
Sprungbefehl übernimmt eine ganz 
spezielle Aufgabe im ANTIC. Was 
würde passieren, wenn der ANTIC 
einmal eine Display-List durchgear- 
beitet hat? Er würde versuchen, die 
Daten, die hinter der Display-List ste- 


ein 
Befeh 


hen, als Grafik-Befehle zu interpretie- 
ren. Und nachdem er 1 KByte durch- 
geackert hat, würde er von vorne die 
Display-List abarbeiten. Nur leider 
würde das nicht mehr synchron zum 
Bildschirm erfolgen. Aus diesem 


Grund gibt es den bedingten Sprung- 
befehl. Man benützt ihn, um am Ende 
einer Display-List wieder an dessen 
Anfang zu springen. Stößt der ANTIC 
auf dieses Kommando, verzweigt er 





ten«) gewidmet. 


nicht gleich zu der Adresse hinter dem 
Sprungbefehl, sondern warteterstein- 
malab, bis der Fernseher oder Monitor 
ein neues Bild zeichnet. Erst dann 
springt er zu der neuen Adresse, die in 
den meisten Fällen wieder der Anfang 
der Display-List ist. 

Damit wären die drei Grundbefehls- 
arten der Display-List beschrieben. 
Jeder Grafik-Befehl übernimmt außer- 
dem bis zu drei zusätzliche Funktio- 
nen, das hängt davon ab, welches Bit 
im Grafikbefehl noch gesetzt ist. Zwei 
Bit im Grafik-Befehl sind dafür reser- 
viert, horizontales und vertikales 


..und der 
die Grafil 


Feinscrolling zu realisieren. Sind 
diese Bits gesetzt, wird eine Grafik- 
zeile um genau so viele Pixel nach 
links verschoben, wie in dem jeweili- 
gen Feinscrollingregister festgesetzt 
sind. Indem man diese Register verän- 
dert, läßt sich auf einfache Weise 
Feinscrolling verwirklichen. 

Die letzte Möglichkeit betrifft das 
Bit, das einen Display-List-Interrupt 
auslöst. Da die Möglichkeiten des 
Display-List-Interrupts sehr vielfältig 
sind, ist diesem Thema ein eigener 
Beitrag (»Als die Farben laufen lern- 
Alle Display-List- 
Befehle sind in der Tabelle zu diesem 
Beitrag zusammengefaßt. 

Wie muß man nun vorgehen, um 
eine eigene Display-List zu verwen- 
den? Zunächst muß feststehen, an 
welcher Stelle die Display-List im 
Speicher steht. Diese Adresse 
schreibt man in die beiden Register 
»SDLSTL« (Adresse 560, $230) und 
»SDLSTH« (Adresse 561, $231), bezie- 
hungsweise in die Hardware-Register, 
wenn Sie die VBLANK-Routine nicht 
benutzen »DLISTL«, Adresse: 54274, 
$D402 und »DLISTH«, Adresse: 
54275, $D403). Vorher sollte man 
jedoch den ANTIC über die Speicher- 
stelle »SDMCTL« (Adresse: 559, $22F) 
beziehungweise über das Hardware- 
Register »DMACTL« (Adresse: 54272, 
$D400) abgeschaltet haben, da es 
sonst manchmal vorkommt, daß das 
Bild häßlich zu flackern anfängt. 
Sobald der vertikale Zeilenzähler 
»/COUNT« (Adresse: 54283, $D40B) 
auf Null steht und damit anzeigt, daß 
der Elektronenstrahl des Fernsehers 
oder Monitors wieder in der obersten 
Zeile angelangt ist, sollte man den 
Bildschirm wieder einschalten. 

Damit wäre alles Wissenswerte 
über die Display-List beschrieben. Sie 
sollten ausgiebig damit experimentie- 
ren, damit Sie ein Gefühl für die Grafik- 
fahigkeiten des Computers bekom- 
men. (hf) 
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Obwohl der Atari nur maximal 
fünf Farben auf dem Bildschirm 
darstellt, strotzen einige Pro- 
gramme nur so vor Farben. Die 
Erklärung liegt bei einem einfa- 
chen aber wirkungsvollen Inter- 
rupt des Computers. 


on Atari gibt es sehr schöne 
V Grafik-Demonstrationsprogram- 
' me. Erinnern Sie sich an den 
grünen Roboter auf dem Fließband, 
der dem Betrachter scheinbar entge- 
genmarschiert? Oder an das in dem 
gleichen Demonstrationsprogramm 
gezeigte Raumschiff, das zu hero- 
ischer Musik durch den Weltraum rast 
und dabei im Takt der Musik auf und ab 
schwebt? Sehr schön ist auch ein Pro- 
gramm, bei dem sich das Atari- 
Zeichen um seine Mittelachse dreht 
und im Vordergrund ein Pelikan quer 
über den Bildschirm flattert. Eins 
haben alle diese Programme gemein- 
sam: Bei allen ist das Atari-Logo an 
irgendeiner Stelle der Demonstration 
zu sehen. Und in dem Zeichen laufen 
regenbogenartig Farben nach oben. 
Dabei sind auf dem Bildschirm je nach 
Größe des Atari-Zeichens zwischen 50 
und 100 Farben zu sehen. Um solche 
Effekte zu erzeugen, bedienen sich 
die Programmierer der Diplay-List- 
Interrupts des Computers. 

Was sind nun Display-List-Inter- 
rupts? Kurz gesagt, damit wird bei 
einer bestimmten Bildschirmzeile im 
Computer ein Interrupt ausgelöst. Der 
Mikroprozessor springt dann ein spe- 
zielles Programm an, mit dem zum 
Beispiel die Bildschirmfarbe umge- 
schaltet wird. Die Bildschirmzeile, in 
der der Interrupt auftreten soll, sowie 
das Programm, das vom Mikroprozes- 
sor angesprungen wird, ist vom Pro- 
grammierer frei definierbar. Üblicher- 
weise besteht das Programm aus 
wenigen Maschinensprache-Be- 
fehlen, mit denen die Farbe am Bild- 
schirm umgeschaltet wird. Der Dis- 
play-List-Interrupt ist jedoch für belie- 
bige andere Anwendungen einsetz- 
bar. Zum Beispiel lassen sich damit ab 
einer bestimmten Bildschirmzeile die 
Position sowie der Speicherbereich 
für die Player-Missiles neu festlegen. 
Auf diese Weise bekommt man statt 
der üblichen vier Player und Missiles 
jeweils acht oder mehr Objekte auf 
den Bildschirm. 

Denkbar wäre auch, daß mit dem 
Display-List-Interrupt eine Musik 
gespielt wird. Musikstücke, die der 
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Als die Farben 


Computer abspielt, während er gleich- 
zeitig noch mit etwas anderem 
beschäftigt ist, werden normalerweise 
mit dem VBLANK-Interrupt realisiert 
(siehe Beitrag »Das Programm im Hin- 
tergrund« in diesem Heft). Der 
VBLANK-Interrupt wird alle 50stel 
Sekunde ausgeführt, wodurch im Takt 
dieser Zeitspanne ein neuer Ton 
beginnt. Definiett man nun einen 
Display-List-Interrupt, der in der Mitte 
des Bildschirms ausgelöst wird und 
der die gleiche Musikroutine wie der 
VBLANK-Interrupt verwendet, so steht 
für das Musikprogramm die doppelte 
Notenauflösung zur Verfügung. Das 
Musikprogramm wird in dem Fall dop- 
pelt so oft aufgerufen. Dies sind nur 
einige anregende Beispiele für den 
Einsatz des Display-List-Interrupts. 
Das Spektrum der Anwendungen ist 
schier endlos, und so manches Spiel 
oder Anwenderprogramm hat schon 
davon profitiert (siehe »Ballblazer« von 
Lucasfilm Games oder »Starlexter« 
von Sybex). 


Stolpersteine in 
der Display-List 


Doch wie wird ein Display-List- 
Interrupt programmiert? Zunächst 
muß festgelegt werden, in welcher 
Bildschirmzeile der Interrupt ausge- 
löst werden soll. Dies wird über die 
Display-List festgelegt. Jeder der 
Display-List-Befehle ist so program- 
mierbar, daß er einen Display-List- 
Interrupt auslöst. Dafür ist in jedem 
Befehl ein Bit reserviert, das bei 
gesetztem Zustand einen Interrupt 
erzeugt (siehe Beitrag »Grafikzaube- 
rei« in diesem Heft). Zu beachten ist 
dabei, daß der Interrupt erst ausgelöst 
wird, wenn der Display-List-Befehl 
bereits abgearbeitet ist. Er tritt also 
immer in der letzten Bildschirmzeile 
eines Befehls auf. Aus diesem Grund 
muß der Interrupt-Befehl in der 
Display-List immer vor dem Befehl ste- 
hen, in dem der Interrupt ausgewertet 
wird. Zudem braucht der Prozessor 
einige Zeit, um zu erkennen, daß ein 
Display-List-Interrupt auftrat. Bis dann 
vom Prozessor das eigentliche Pro- 
gramm angesprungen wird, ist der 
Elektronenstrahl auf dem Bildschirm 
fast bei der nächsten Bildschirmzeile 
angelangt. 

Das Programm, das durch den Dis- 
play-List-Interrupt aufgerufen wird, 
muß aus Zeitgründen in Maschinen- 
sprache programmiert werden. Wich- 
tig bei einer Display-List-Routine ist 





die Tatsache, daß beim Aufruf der Rou- 
tine alle Prozessor-Register noch 
erhalten sind. Die in dem Programm 
verwendeten Register müssen also 
erst gesichert werden, zum Beispiel 
auf dem Stack. Nehmen wir an, daß 
wir eine Display-List-Interrupt-Routine 
programmieren wollen, die an einer 
Stelle des Bildschirms die Farben 
umschaltet. Dazu wird höchstens ein 
Register benötigt, in diesem Fall der 
Accumulator Der erste Befehl der 
Display-List-Interrupt-Routine muß also 
PHA 

lauten. Damit wird der Inhalt des 
Accus auf dem Stack gesichert. Als 
nächstes wird der Accu mit dem Farb- 
wert geladen, auf den umgeschaltet 
werden soll, und das Farbregister mit 
diesem Wert geladen. 


LDA #330 ;Farbe Rot 
STA $D013 ;als Hintergrundfarbe 


Danach muß der Accu wieder mit 
dem Wert geladen werden, den er bei 
Eintritt in die Interrupt-Routine ent- 
hielt. Die Routine wird anschließend 
wieder verlassen, und der Mikropro- 
zessor nimmt seine unterbrochene 
Arbeit wieder auf. 

PLA 
RTI 


Das war schon die ganze Display- 
List-Routine zum Umschalten der Hin- 
tergrundfarbe. Je nach Aufgabenstel- 
lung muß die Routine entsprechend 
erweitert werden. Elementar wichtig 
ist jedoch, daß das Programm alle 
Register, die in der Routine benutzt 
werden, auf dem Stack sichert, und 
daß es diese vor dem Verlassen der 
Routine wieder restauriert. 

Nachdem feststeht, wo ein Interrupt 
auftreten soll und die Routine fertig ist, 
muß dem Computer mitgeteiltwerden, 
ab welcher Adresse die Routine im 
Computerspeicher steht. Dies 
geschieht über »VDSLST« (Adressen 
512 und 513, $200 und $201). In 
VDSLST wird dabei das Low-Byte der 
Adresse der Interrupt-Routine ge- 
schrieben und in VDSLST+1 dasHigh- 
Byte. Tritt nun ein Interrupt auf, springt 
der Prozessor über diese Adresse in 
die Interrupt-Routine. Mit der Spei- 
cherstelle »NMIEN« (Adresse 54286, 
$D40E) wird der Interrupt eingeschal- 
tet, indem Bit 7 dieser Adresse gesetzt 
wird (siehe auch Seite 125). Abge- 
schaltet wird die Routine wieder, 
indem dieses Bit gelöscht, oder wenn 
die <RESET>-Tas$te auf der Tastatur 
gedrückt wird. 

In Verbindung mit den Display-List- 
Interrupts spielt das Register 





laufen lernten 


»WSYNC« (Adresse 54282, $D40A) 
eine wichtige Rolle. Wenn Sie das 
obige Assembler-Programm eingege- 
ben haben und den Interrupt wie 
erklärt einschalten, werden Sie auf 
dem Bildschirm einen Farbwechsel 
sehen. , 

Der Ubergangsbereich der Farben 
vor und nach dem Interrupt flackert 
jedoch. Der Interrupt wird immer am 
Anfang der letzten Zeile eines Display- 
List-Befehls ausgelöst. Bis der Mikro- 
prozessor jedoch die Interrupt- 
Routine angesprungen hat, ist der 
Elektronenstrahl auf dem Bildschirm 
ein gutes Stück weitergewandert. 
Nachdem der Strahl dann gut drei 
Viertel der Bildschirmzeile beschrie- 
ben hat, stößt der Mikroprozessor auf 
den »STA $DO018«-Befehl, womit die 
Bildschirmfarbe schlagartig umge- 
schaltet wird. Auf dem Bildschirm ist 
dadurch eine unansehliche Treppe zu 
erkennen, die obendrein noch zittert. 
Zur Vermeidung dieses Effekts ist die 
Speicherstelle WSYNC vorhanden. 


Mit sieben Befehlen 
zum Regenbogen 





Schreibt der Mikroprozessor irgendei- 
nen Wert in diese Speicherstelle, so 
wird er bis zum Änfang der nächsten 
‚Bildschirmzeile angehalten. Dies läßt 
sich ausnutzen, 


um die häßliche 










200 

513 ‚201 
NMIEN 34286 D40E 
WSYNC 54282 DA0OA 


Inserentenverzeichnis 


Atari 156 
Computer-Service 49° 
Compy-Shop 49 



















7, 16, 19, 22, 24, 28, 31 
Müller Thomas 141 
Peksoft 79 
Rätz-Eberle 2.199 






Systemadressen für Display-List-Interrupts F3 


REPLAY 


* ist ein echter Freezer mit | 
Custom Chip 
Backup für ATARI S00XU 
130XE/800XE und Disket- 
tenstation 1050 

* Programme im Lauf anhal- 
ten, abspeichern und belie- 
big oft weiterlaufen lassen 


| Disketten im Bootformat 
* Öldrunnergenerator serien- 


Ecosoft 158 | 
Fun Tastic 79 
| Kingsoft 69 * schreibt 
| FO. Malisch 153 | 
| Markt& Technik Buchverlag | mäßig 


PREIS: nur 48,- DM! 
Info gegen frankierten Rückumschlag 
(70 Pf) nur bei: 
Frank-Oliver Malisch 
Mozartstr. 32 - D-8014 Neubiberg 





Treppe auf dem Bildschirm zu vermei- 
den. Folgendes Programm soll dies 
verdeutlichen: 

PHA 

LDA #330 

STIA WSYNC 

STA $DO18 

PLA 

RL 


Jetzt wartet der Mikroprozessor mit 
dem Umschalten der Farbe bis zum 
Beginn einer neuen Zeile. Damit ist 
der Farbübergang hinter den nicht 
sichtbaren linken. Rand des Bild- 
schirms gerückt. 

Mit der Speicherstelle WSYNC wird 
auch der Farblauf in den verschiede- 
nen anfangs angesprochenen Atari- 
Grafikdemonstrationen program- 
miert. Diese legen eine Speicherstelle 
fest, die nach jedem Interrupt um i 
erhöht wird, sollen die Farben nach 
oben laufen, oder um 1 vermindert 
wird, wenn sie nach unten laufen. 
Anschließend lädt der Accu diese 
Speicherstelle. Dann erfolgt der obli- 
gatorische Schreibbefehl in WSYNC 
und das Umschalten der Farben. Der 
Accu wird nun um 1 erhöht oder ver- 
mindert, je nachdem, auf welche 
Weise der Farblauf auf dem Bild- 
schirm erscheinen soll (von Hell nach 
Dunkel oder umgekehrt). Anschlie- 
Bend wird dieser Wert wieder in 
WSYNC geschrieben und die Proze- 
dur so lange wiederholt, bis der 






Low-Byte der Adresse der Interrupt- 
Routine hi 
High-Byte der Adresse der 
Interrupt-Routine 

Bit 7 schaltet DLIs ein und aus 

läßt den Prozessor auf den Beginn der 
nächsten Bildschirmzeile warten 







Register 







Neu: 
selbststartende 

















Ecosoft Economy Software AG 


Kaiserstraße 21, 7390 Waldshut, Tel. 077 51 - 7920 
Frei-Programme (fast) gratis 


Neu: Stark erweiterte Kollektionen: IBM: 1020 Disks, C64: 360 Disks, 
C 128: 35 Disks, Atari St: 220 Disks, Amiga: 120 Disks, 
Apple Il: 260 Disks, Macintosh: 335 Disks 


Sonderkollektionen: Yon uns nach Sachgebieten sortierte und auf | 
Lauffähigkeit und Qualität geprüfte Programme. Bitte Liste «Sonder- | 
kollektion» anfordern. (Computermarke angeben bitte.) | 





Bereich auf dem Bildschirm, in dem 
die Farben laufen, abgedeckt ist. 
Ohne Probleme lassen sich auch 


mehrere Interrupts hintereinander 
programmieren. Zum Beispiel soll der 
Bildschirm in drei Farben aufgeteilt 
werden, der obere Bereich Rot, in der 
Mitte Grün und unten Blau. Zunächst 
setzt man die Bildschirmfarbe auf Rot. 
Dann bestimmt man in der Display- 
List, an welcher Stelle auf dem Bild- 
schirm die Farben umgeschaltet wer- 
den sollen. Gleichzeitig müssen zwei 
Interrupt-Routinen programmiert wer- 
den. Die eine schaltet die Bildschirm- 
farbe auf Grün und die zweite auf 
Blau. Die erste setzt aber, nachdem 
sie die Farbe umgeschaltet hat, die 
Startadresse der Display-List- 
Interrupt-Routine auf die zweite Rou- 
tine. Die zweite führt das Entspre- 
chende mit der ersten Routine durch. 
Auf diese Art ist gewährleistet, daß die 
Routinen immer hintereinander auf- 
gerufen werden. Der Bildschirm wird 
durch die VBLANK-Routine automa- 
tisch auf Rot geschaltet. Schon haben 
Sie drei Farben untereinander auf 
dem Bildschirm. 

Damit wär auch schon alles über die 
Programmierung von Display-List- 
Interrupts gesagt. Mit wenigen Befeh- 
len lassen sich erstaunliche Effekte 
erzielen. Mit Ihrem neu erworbenen 
Wissen dürfte es Ihnen keine Pro- 
bleme bereiten, zu verstehen, wie zum 
Beispiel »Ballblazer« programmiert 
wurde. Beim Vor- und Zurückfahren 
werden einfach andere Display-Lists 
mit anderen Interruptstellen verwen- 
det. Fertig ist der Fahreffekt. Mit 
Display-List-Interrupts lassen sich 
auch Änwenderprogramme optisch 
enorm aufmöbeln (siehe »ASS« in die- 
sem Heft). Und so schwierig istdas gar 
nicht. Probieren Sie es aus. (hf) 










| Neu: Deutsche Programme 


Katalog auf Disketten und 1 Diskette mit 
10 beliebten Programmen DM 10.- 


Einschliesslich gedrucktes Sachgebiets-Verzeichnis. 
(Bitte Banknote oder Scheck beilegen.) 


Bitte unbedingt Computermarke und Modell angeben. 
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Als ist man 


Programmierer 
nicht ausschließlich auf den 
eingebauten Zeichensatz der 
XL/XE-Computer angewiesen. 
Neue Zeichensätze sind ohne 
Probleme nachrüstbar. 


ennen Sie »Turbo-Basic«? 
1 isst Ihnen auch das 

Happy-Computer-Zeichen be- 
kannt, das am oberen Rand des Bild- 
schirms steht, während Turbo-Basic 
lädt. Um das Zeichen auf dem Bild- 
schirm darzustellen, wurde eine spe- 
zielle Eigenschaft der Atari-Computer 
ausgenutzt: Es lassen sich beliebige 
neue Zeichensätze definieren. Ob 
man nun Umlaute und das deutsche 
»B« zur Verfügung haben möchte, ob 
man ein Copyright-Zeichen benötigt 
oder einfach nur in kyrillischer Schrift 
programmieren möchte, mit umdefi- 
nierten Zeichensätzen ist das alles 
machbar. 

Ein Zeichen wird auf dem Bild- 
schrm in einer Acht-mal-acht- 
Punktmatrix dargestellt. Jeweils acht 
nebeneinanderliegende Punkte wer- 
den in einem Byte zusammengefaßt. 
Für ein komplettes Zeichen benötigt 
man also acht Byte. Diese werden im 
Speicher hintereinander abgelegt, 
wobei die erste Zeile eines Zeichens 
das erste Byte ist, die zweite Zeile das 
zweite Byte und so weiter. 

Wenn Sie ein Zeichen entwerfen, 
müssen Sie eine Besonderheit des 
Atari-Computers beachten: In einem 
Zeichen müssen horizontal immer 
zwei Punkte nebeneinander liegen, 
da der Punkt sonst kaum sichtbar ist. 
Wahrscheinlich kennen Sie den 
Effekt, wenn Sie in Grafikstufe 8 eine 
vertikale Linie ziehen. Schalten Sie 
Ihren Computer ein und geben Sie im 
Basic folgende Befehlsfolge ein: 
GRAPHICS 8 
SETCOLOR 2,0,0 
COLOR 1 
FLOT 160,10:DRAWTO 160,150 

Sie sehen in der Mitte des Bild- 
schirms jetzt eine blasse vertikale 
Linie. Geben Sie nun zusätzliche, fol- 
gende Zeile ein: 

PLOT 161,10:DRAWTO 161,150 

sofort erstrahlt die Linie in hellem 
Weiß. Die gleichen Effekte würden 
auch in Zeichensätzen auftreten, 
denn die Punkteauflösung auf dem 
Bildschirm ist in Grafikstufe O und 8 
gleich (ein Zeichen besteht vertikal 
aus acht Punkten, und 40 Zeichen las- 
sen sich nebeneinander darstellen, 
macht also 320 Punkte wie in Grafik- 
stufe 8). 

Dieses merkwürdige Verhalten 
hängt mit dem Videosignal des Com- 
puters zusammen. Da sich das Gerät 
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Die Handschrift 


technisch seit seinem Erscheinen im 
Jahr 1979 nicht verändert hat, ist 
immer noch das gleiche Videoteil ein- 
gebaut. Wahrscheinlich wußte Atari 
zum damaligen Zeitpunkt nicht, wie 
mit vertretbarem Aufwand und vor 
allem in vertretbarem finanziellen 
Rahmen ein besseres Videoteil einge- 
baut werden könnte. 

Ganz nebenbei lassen sich dadurch 
bei einem Farbfernsehapparat oder 
Monitor hübsche Effekte erzeugen. 
Geben Sie dazu folgendes Programm 
ein: 

100 GRAPHICS 8 

110 SETCOLOR 2,0,0:C0L0R 1 
120 EOR: I=0 TÜ: 319 SIER 2 
130 PLOT I,0:DRAWTO 1,159 
140 NEXT I 

Wenn Sie das Programm laufen las- 
sen, sehen Sie, wie sich der Bild- 
schirm langsam mit dunkelgrünen 
und hellblauen vertikalen Linien über- 
zieht. Bei einem amerikänischen 
System mit der NTSC-Fernsehnorm 
würden diese in sattem Purpur und 
Blau leuchten. Einige amerikanische 
Spiele nutzen diesen Effekt gebüh- 
rend aus. Das führt dann dazu, daß 
zum Beispiel »Ultima Illx in Amerika 
vor Farben strotzt, in Deutschland da- 
gegen ist das Spiel trostlos grau in grau. 


Im Speicher 


Doch zurück zu den Zeichensätzen. 
Je nach gewählter Grafikstufe lassen 
sich gleichzeitig unterschiedlich viele 
Zeichen darstellen. In Grafikstufe O0 
sind es 128 Zeichen, in Grafikstufe 1 
und 2 dagegen nur 64. Damit nimmt 
ein Zeichensatz je nach gewählter 
Grafikstufe auch verschieden viel 
Speicher in Anspruch. In Grafikstufe 0 
benötigt er 1 KByte, in Grafikstufe 1 
und 2 nur ein halbes KByte. 

Der Zeichensatz bildet im Speicher 
des Computers einen zusammenhän- 
genden Block von Bytes. Nachdem 
man einen Zeichensatz zusammen- 
gestellt hat und dieser im Speicher 
steht, muß man dem Computer nur 
noch mitteilen, an welcher Adresse 
sich der neue Zeichensatz befindet. 
Beim Atari-Computer gibt es nun die 
Einschränkung, daß der Zeichensatz 
nicht an jeder beliebigen Stelle im 
Speicher stehen darf. Vielmehr mußer 
bei Grafikstufe O an der Grenze zum 
nächsten vollen KByte im Computer 
stehen, also zum Beispiel bei Adresse 
16384, 17408 oder 18432 ($4000, 
$4400, $4800) und bei Grafikstufe 1 
und 2 an der Grenze zum nächsten 
halben KByte, zum Beispiel bei 
Adresse 16384, 16896 oder 17408 
(54000, $4200, $4400). Aus diesem 


auf dem Bildschirm 
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des Computers 





Grund reicht auch ein einziges Byte, 
um dem Computer den Beginn des 
Zeichensatzes mitzuteilen. Dies 
geschieht über die Speicherstelle 
54281 ($D409), die den Namen 
»CHBASE« trägt. In diese Speicher- 
stelle trägt man also das höherwertige 
Byte der Adresse des Zeichensatzes 
ein. Will man in Basic eigene Zeichen- 
sätze verwenden, so benutztman bes- 
ser das Schattenregister von CHBASE 
bei Adresse 756 ($2F4) mit dem 
Namen »CHBAS«. (Was es mit den 
Schattenregistern auf sich hat, lesen 
Sie in dem Beitrag »Programm im Hin- 
tergrund«.) 

Damit Sie einen kompletten Zei- 
chensatz programmieren können und 
Ihre Zeichen anschließend wiederfin- 
den, müssen Sie noch wissen, in wel- 
cher Reihenfolge die Zeichen im Spei- 
cher stehen. Theoretisch müßte man 
annehmen, daß zum Beispiel das Zei- 
chen »A« mit dem ASCHII 65 auch die 
65ste 8-Byte-Gruppe im Zeichensatz 
ist. Dem ist aber nicht so. Im Speicher 
stehen erst die Zeichen mit ASCII zwi- 
schen 32 und 95, dann folgen 32 Zei- 
chen, die die Grafiksymbole enthal- 
ten, und am Schluß stehen 32 Zeichen 
mit den kleinen Buchstaben. Nur so 
lassen sich in Grafikstufe 1 und 2 
Großbuchstaben, Zahlen und Sonder- 
zeichen zusammen darstellen. Wäre 
der Zeichensatz im Speicher in der 
gleichen Reihenfolge wie der ASCII 
aufgebaut, so ließen sich Buchstaben 
und Sonderzeichen in diesen Grafik- 
stufen nicht zusammen verwenden, 
denn diese Zeichen würden an zwei 
verschiedenen Halb-KByte-Grenzen 
liegen. Zur Verdeutlichung ein kleines 
Experiment. Geben Sie folgende Zei- 
len in den Computer ein: 

GRAPHICS 1 
PRINT #6; "HALLO, DU DA!” 

Auf dem Bildschirm sehen Sie jetzt 
am oberen Rand eine orangefarbige 
Textzeile. Tippen Sie nun den Befehl 
POKE 756,226 
ein. Damit versetzen Sie den Zeichen- 
satz um ein halbes KByte. Der Bild- 
schirm ist jetzt übersät mit Herzchen, 


der Text in der ersten Zeile ist klein 
geschrieben, und das Komma unddas 
Ausrufezeichen im Text haben sich in 
Grafikzeichen verwandelt. Wenn Sie 
jetzt folgende Zeilen eingeben, 
GRAPHICS O 

PRINT "HALLO, DU DA!” 

FOKE 756,226 

werden Sie anschließend keine Verän- 
derung feststellen, denn in Grafikstufe 
0 läßt sich der Zeichensatz nur in gan- 
zen KByte-Schritten versetzen. 
Geben Sie aber 

POKE 756,228 

ein, um den Zeichensatz um ein kom- 
plettes KByte zu verschieben (der Ori- 
ginalzeichensatz liegt bei 224), so 
werden Sie auf dem Bildschirm nichts 
mehr erkennen können. Jetzt nimmt 
der Computer nämlich einen Spei- 
cherbereich als Zeichensatz an, des- 
sen Bitmuster keine sinnvollen Sym- 
bole ergeben. 

Nebenbei bemerkt gibt es in den 
XL/XE-Computern noch einen zwei- 
ten kompletten Zeichensatz, der 
anstelle der ohnehin selten benutzten 
Grafiksymbole zahlreiche Sonderzei- 
chen enthält, darunter auch die deut- 
schen Umlaute. Sie schalten diesen 
Zeichensatz ein, indem Sie den Befehl 
POKE 756,204 
eingeben. Leider hat dieser Zeichen- 
satz nicht das deutsche »B« eingebaut. 
Deshalb haben wir für Sie ein Pro- 
gramm abgedruckt, das den Original- 
zeichensatz vom ROM ins RAM 
kopiert und dann anstelle der Grafik- 
zeichen die deutschen Umlaute und 
das »B« einfügt. 

Mit Zeichensätzen lassen sich noch 
einige Spielereien anstellen. Im Atari 
gibt es nämlich noch ein weiteres 
Register, das in Verbindung mit Zei- 
chensätzen von Bedeutung ist. Wahr- 
scheinliich haben Sie sich schon 
gewundert, daß ein Zeichensatz in 
Grafikstufe O0 aus nur 128 Zeichen 
besteht, obwohl in Basic mit dem 
CHR$-Kommando 256 Symbole aus- 
gedruckt werden können. Die ersten 
128 Zeichen werden dann normal dar- 
gestellt. Die zweiten 128 Zeichen ent- 
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Systemadressen für Zeichensätze 


Bit 0 - inverse Zeichen asgerm 
Bit 1 - inverse Zeichen sichtbar 
Bit 2 - alle Zeichen auf dem Kopf 


CHART 1759 2E3 Schattenregister von CHACTL 

CHBAS 756 2F4 Schattenregister von CHBASE 
CHBASE 54281 D409 legt den Beginn eines Zeichensatzes fest 
CHRORG 57344 E000 Beginn des eingebauten Zeichensatzes 


Beginn des Sonderzeichensatzes 








sprechen den ersten 128, mit dem 
Unterschied, daß sie invers ausge- 
geben werden (schwarze Schrift auf 
weißen Grund). Diese Zeichen sind 
nicht etwa invers programmiert, dafür 
wäre im Zeichensatz gar kein Platz 
vorhanden. Vielmehr stellt der Com- 
puter Zeichen mit einem ASCII größer 
als 127 automatisch invers dar. Dem 
Computer teilt man jedoch über das 
obengenannte Register mit, wie er die 
letzten 128 Zeichen darstellen soll. 
Dieses Register liegt bei Adresse 
54273 ($D401)} und trägt den Namen 
»CHACTL«. In Basic muß man jedoch 
dessen Schattenregister mit dem 
Namen »CHART« bei Adresse 755 
($2F3) benutzen. 

Das Register übernimmt drei Funk- 
tionen. Setzt man Bit O in diesem Regi- 
ster, so werden die normalerweise 
invers dargestellten Zeichen unsicht- 
bar. Geben Sie dazu folgende Zeilen 
ein: 

GRAPHICS 0 
FOR I=128 TO 255:? CHRS(T);: 
NEXT I 

Auf dem Bildschirm stehen jetzt 
sämtliche inverse Zeichen des Com- 
puters. Tippen Sie nun folgenden 
Befehl ein: 

PORE7595,1 

Alle inversen Zeichen sind vom Bild- 
schirm verschwunden, auch der Cur- 
sor, der selbst ein inverses Leerzei- 
chen ist. Wenn Sie nun anschließend 
FOKE 733,0 
eingeben, sind alle Zeichen wieder 
normal dargestellt. Mit 
FORE 755,2 
haben Sie den Urzustand hergestellt, 
denn setzt man Bit 1, so werden die 
Zeichen mit ASCII größer 127 invers 
ausgegeben. Setztman BitO und Bit 1 
- in Speicherstelle 755 muß also eine 
3 stehen - werden alle normalerweise 
inversen Zeichen als weißer Block 
abgebildet. Bit 2 von CHART stellt alle 
Zeichen auf den Kopf. Über Sinn oder 
Unsinn dieser letzten Funktion läßt 
sich streiten. Auf jeden Fall hat sie der 
Computer eingebaut, und warum 
sollte man damit nicht mal den einen 
oder anderen Gag programmieren. 

Neben den normalen Zeichensät- 
zen kann der Atari farbige Zeichen- 
sätze auf den Bildschirm bringen. Sie 
kennen sicher die beiden Grafikstufen 
12 und 13. Geben Sie einmal folgen- 
des ein: 

GRAPHICS 12 
PRINT #6; "HALLO, DU DA!” 

Auf dem Bildschirm sehen Sie jetzt 
in der oberen linken Ecke eine merk- 
würdige Ansammlung von Farbpunk- 
ten. Das liegt daran, daß der Compur 
ter in dieser Grafikstufe die einzelnen 
Bit eines Zeichens anders interpre- 
tiert. Das Zeichen ist jetzt nur vier Bild- 
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punkte breit. Jeweils zwei nebenein- 
anderliegende Bit im Zeichensatz 
werden benutzt, um einen Bildschirm- 
punkt darzustellen. Mit zwei Bitlassen 
sich insgesamt vier verschiedene 
Kombinationen bilden. Jeder dieser 
Kombinationen wird ein entsprechen- 
des Farbregister zugeordnet. »SET- 
COLOR 4....« verändert die Farbe des 
Bildschirmpunktes mit dem Bitmuster 
»00«, »SETCOLOR 0,...« ist für »O1«, 
»SETCOLOR 1,...« für »10« und »SET- 
COLOR 2.,...« ist für »T1« zuständig. 
Wie bei Grafikstufe O werden gleich- 
zeitig maximal 128 Zeichen darge- 
stellt. Und wie bei Grafikstufe O haben 
auch hier Zeichen über ASCII 127 eine 
spezielle Bedeutung. Druckt man 
diese Zeichen aus, so nehmen die 
Bildschirmpunkte mit dem Bitmuster 
»10« die Farbe an, die mit dem Befehl 
»SETCOLOR 3,....« festgelegt wird. 
Damit lassen sich in den Grafikstufen 


12 und 13 fünf verschiedene Farben 
gleichzeitig auf dem Bildschirm dar- 
stellen. 

Um diese Grafik-Betriebsart zu nut- 
zen, muß man sich erst einen entspre- 
chenden Zeichensatz zusammenba- 
steln. Ganz einfach läßt sich das eben- 
falls mit dem in dieser Ausgabe abge- 
druckten »CHAR-MAKER« bewerk- 
stelligen. 

Zum Schluß gibt es noch eine Zei- 
chensatzbetriebsart, die es erlaubt, 
Unterlängen in den einzelnen Zeichen 


darzustellen. Diese Betriebsart wird. 


vom Betriebssystem des Computers 
nicht unterstützt. Deshalb muß man 
sich dafür eine eigene »Display-List« 
schreiben (wie das geht, wird im Bei- 
trag »Grafikzauberei« beschrieben). 
Diese letzte Betriebsart stellt alle Zei- 
chen auf dem Bildschirm zehn Zeilen 
hoch dar. Trotzdem werden nach wie 
vor im Zeichensatz nur acht Byte pro 


Zeichen verwendet. Der Trick bei der 
Sache ist, daß bei den letzten 32 Zei- 
chen eines Zeichensatzes von einem 
Zeichen die ersten beiden Byte 
genommen und unter das Zeichen 
gesetzt werden. Die oberen beiden 
Zeilen eines Zeichens auf dem Bild- 
schirm bleiben dann frei (siehe Seite 
134). Aufdiese Weise lassen sich ganz 
einfach Unterlängen darstellen. Vor- 
aussetzung dafür ist, daß die kleinen 
Buchstaben in den letzten 32 Stellen 
eines Zeichensatzes stehen, was 
beim Originalzeichensatz der Fall ist, 
und daß man sich einen Zeichensatz 
für Unterlängen umbastelt. 

Damit wären sämtliche Wege zur 
Gestaltung von Zeichensätzen bei 
den Atari-XL-Computern beschrie- 
ben. Viel Spaß mit Ihren eigenen Krea- 
tionen und mit dem auf Seite 35 vorge- 
stellten »CHAR-MAKER«! 

(Andreas Sons/hf) 
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Ük. 


188 PRINT "{ESC CTL <}" <aH > 
110 :DIM TREE$ (20) : TREES="!s{ESC CTL +I{E Same: re 
SE ETL +3CESC CTL =FaHTESC CTL +I{ESC CT 20920 ;* 
L +3{ESC CTL =3#&IESC ECTL -IXESC ETL -)E BOOSB ;* ZEICHENSATZUMWANDLUNG * 
ESC ECTL -7":TREEF (5,5) =CHR# (34) <FA> BAAAO ;* auf deutsche Zeichen * 
128 POKE 18&,PEEK(186) -4:6RÄPHICS B:DL=P BuaSO ;* * 
EEK (560) +PEEK (561) #25& <HQ}> Bas cn 21.1.1787 x 
| 2 ı_ Erf H 
150 POKE DL+4,8:POKE DL+S,PEEK(186) :FOR ea a are ie ei 
A=B TO S11:POKE PEEK (196) #256+A ,PEEK (573 22090 :* = 
44+A) NEXT A UV? DEIN ze 
148 POKE DL+5,PEEK (89) :POKE DL+3,58:FOR D211B ; 
A=-DL+5 TD BL+1F:FOKE A,„4:NEXT A:FOKE DL+ 2120 ; Dieses Programm setzt in den 
4,PEEK (88) <ROF> BB13580 ; Standart-Zeichensatz die 
158 FOR A=PEEK (195) #256+8 TOD PEEK (186) *2 Bien ‚ ‚deutschen Umlaute ein. 
56+55:READ B:POKE A,B:NEXT A <X0> ‚ 
BalsB ; 1 = grosser A Umlaut 
160 POKE 756,PEEK (194) <AG> 20170. Voelkieiner u Umlant 
178 GOSUB 258 ssVH BE1iSB ; 15 = grosser D Umlaut 
188 POSITION 19,8:PRINT TREES$ <IA> 22198 ; 165 = kleiner o Umlaut 
1978 FOKE 719,364: FOKE 712,8 <HH> 29208 ; 17 = kleiner a Umlaut 
208 FÜKE 7BS+INT (RND (8) #23 „175+RND (BI #62 <AM> BaZie ; Z1 = grosser U Umlaut 
218 FOR A=1 TO RND(B)*18: NEXT <Z0> ee ; 26 = deutsches sz 
220 GOTOD 280 <LV> ‚ Ä 
230 A=1536:RESTORE 360: POKE 54286, <OH> N ee 
2498 READ B:IF B<256 THEN FOKE A,B:A=A+1: DBER: 02ER GCHAR .EO SEO 
GOTO 240 <HD> BOE2: 20278 SSTART .EO $E2 
258 RESTORE 348:POKE 82,5:POKE 83,35 <SY> DBE4: 2280 SEND .ED $EA& 
260 POKE DL+29,134:POKE DL+21,12 <ZP> DBE&: 29292 DSTART .EQ $E6 
27@ FOSITION 8,15:PRINT "tree":FOKE 711, BQEB: Ba5ad ANZAHL „EG +EB 
10 >: cu SE RER 
288 FRINT :PRINT "DIESES.PROGRAMM-SOLL.D 0:30 : 
IE-MOEG-„LICHKEIT-ZUM-UMDEFINIEREN.DES" <IV> aBsh: 20340 RAMTOP ER s&aA 
298 PRINT "ZEICHENSATZES.DEMONSTRIEREN.. 20350 ; 
„an DER-.BAUM-BESTEHET AUS: A" <PK> BES4D ; PROGRAMMSPEICHERUNG 
308 FOR A=33 TO 38:PRINT CHR&(A)Z:NEXT A 22370 ; 
:PRINT "._" <OL> 22380 „OR Fand 
318 POKE 82,0:POSITION 2,17:PRINT TREEs <xV> en we en Ser 
328 POKE 83,39:POSITION 36,17:PRINT TREE Bes ae I 
ie Br 20429 ; PRÜSRAMMSTART 
358 POKE 512,8:POKE 513,&4:POKE 54285,192 22439 ; 
: RETURN <LF> D&DO: 48 BRAD PLA 
3,5 74943454 54255455 12565, 202 <FD> BB45B ; ERMITTELT DEN SPEICHERBEREICH 
350 DATA-0,72,52,240,224,55,252,158,192, a N ee reigiährnrng 
192,192,192,192,192,224,192,192,192,192, Seren 
172,172,240,204 ,52 <HX?> Qs0i: AS AA GASERB LDA RAMTOP 
568 DATA-72,16897,8,141,18,212,141,24,208, BARS: 85 Ei BBSIO STA SCHAR+1 
169,18,141,23,208,173,244,2,141,9,212,18 2405: A? DB B9528 LDA #0 
4,64,256 <HS> 25087: 85 EB D0538 STA GCHAR 
B3548 ; 
2 - . , 20558 : KOPIERT DEN ZEICHENSATZ 
Listing. »Tree« demonstriert anschaulich Farbzeichen- 00560 ; VOM ROM INS RAM 
sätze beim XL/XE 00570 ; 











REM 
I=1536 


D& 


02580 
BB5r7O 
Bas 
261 
226208 
20558 
006548 
BB458 
BOSAD 
Baar 
BBs80 
BA&FB 
DBB7OR 
Bua71B 
28720 
20738 
20740 
29738 
Bo7&n 
00778 
209780 
BE7FB 
DB 
BBS1B 
DB828 
29850 
2RBS40 


@u858 ; 
; VERAENDERN DES ZEICHENSATZES 


00868 
aB870 
23830 
20890 
aaFaR 
2a710 
209728 
299730 
20942 
aa9sı 
10 2tr) 
20970 
09980 
20990 
21200 
B1210 
B1020 
BıaSa 
219048 
21259 
21068 
21070 
D1aS0 
910978 
91180 
91118 
21120 
91158 
01140 
91150 
21168 
01170 
21188 
01190 
21208 
212108 
21228 
81238 
21248 


LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
5Täa 
LDA 
STA 
LDA 
sTA 
5 
LDY 
LODOP 
LDA 
STA 
INY 
BNE 
Bi 
LDA 
CMP 
BEO 
INC 
INC 
JMP 
LOOP1 


LDA 
sTA 


L. 
LDA 
5TA 
LDA 
sTA 


SSTART+1 
#2 

SEND 
#+E4 
SEND+1 
GEHAR 
DSTART 
GEHÄAR+1 
DSTART+1 


#0 


(SSTART) „Y 
(DSTART} „Y 


LOOP 


SSTART+1 
SEND+1 
LOOP1 
SSTART+1 
DSTART+1 
LOOP 


1) 
ANZAHL 


#CHARS 
SSTART 
/CHARS 
SSTART+1 


3 
EXCHANI 


LDY 


LDA CHRPOS,Y 


ASL 
ASL 
ASL 
ECLC 
ADC 
S5TA 
LDA 
ADC 
5TA 


a 
LDY 


ANZAHL 


GECHÄR 
DSTART 
GCHAR+1 
#2 
DSTART+1 


#7 


EXCHAN 
(SSTART) „Y 
(DSTART) ,Y 


LDA 
S5STA 
DEY 
BPL 
n 
INC 
LD 
CHF 
BEB 
F 
LDA 
CLCE 
ADC 
5TA 


EXCHAN 


ANZAHL 
ANZAHL 
#7 
EXIT 


SSTART 


#B 
SSTART 


READ J:IF J=256 THEN 168 
POKE I,J: I=I+1:60T0 148 
POKE 194,PEEK (1864) -4: GRAPHICS 8 
A=USR (1536) 
POKE 756,PEEK (186) 


END 


bestimmt die 
Adresse der zu 
ıErsetzendene 
‚Zeichen im RAM 


DATA.194,165,106,133,225,169,0 
DATA=133,224,169,0,133,226, 189 
DATA-224,133,227,169,0,133,228 
DATA2169,228,133,229,165,224,133 
DATA-238,165,225,133,231,1&2,® 
DATAı177,226,145, 230,220, 208,249 
DATA.165,227,197,229,240,7,230 
DATA_227,230,231,75,35,6,169 
DATA-9,133,232,169,129,133,226 
DATA2169,6,133,227,164,232,185 





D&77: 40 


SPHBESSEH 


BBRÄSERSMEBSES 


4 
20 


D&BB: 
QB&BR: 
Q4&BE: 


21 
10 
1A 


27 gF 
13 19 


—_—— Symbol 
DOES: ANZAHL 
2578: CHARS 
B&BS: CHRPFOS 
BBE&ö: DSTÄRT 
DA5B: EXCHÄN 
B&443: EXCHANI 
377: EXIT 
DOEB: GEHÄAR 
0623: LOOP 
2457: LOOP1i 
BBaA: RAMTOP 
DBRE4: SEND 
BOE?: SSTART 
DBsaßi: START 


ük. 


281258 
B125B 
01278 


; B1288 


81290 
21308 
81518 
01328 
2313380 
81548 
81358 
01358 
31378 


21388 


015970 


214808 


21410 


231428 


81430 


814408 


21450 


B1450 
21470 
DB1450 
31470 
21500 


91318 | 


21520 


table 


LDA SSTART+1 
ADC #9 

STA SSTART+1 
JMP EXCHANI 


VERLASSEN DES PROGRAMMES 


IP Te I u; 


EXIT 
RTS 


BITFELD FUER DIE ZU 
ERSETZENDE ZEICHEN 


DH“ -.,. 48 


HARS 
„HS 4513 ICAsA57EAsDD 
BISSEEBEESEAHITED 
SAISChAshsssss3chgh 
&50035056555553C00 
„HS S6BRICHSIESHITERR 
‚HS SESH0S Ass HhTERD 
„HS 


BISCESHT’C5E CHR 


„HS 3055 7Cs.sh7Cadaeel 


TABELLE FUER POSITION 
DER ZEICHEN 


HRFOS 


„HS BIBFBOF1B13151A 


Listing. Für Assemblerfreaks: Umlaute und »B« 


328 DATA.184,6,18,10,19,24,101 
DATA-224,133,230,165,225,1905,2 
DATA-133,231,160,7,177,226,145 
DATAL23Q,136,16,249,230,232,185 
DATA-232,2901,7,248,16,165,226 
DATA-24,105,8,133,226, 165,227 
DATAL125,8,133,227,76,67,6 
DATA.96,182,24,60,182,102,126 
DATA-192,0,9,182,90,182,192 


>70 
4298 
418 
420 
450 
440 
450 
460 
472 


DATA-192,62,0,102,60,182,182 
DATA-182,102,60,90,102,0,60 
DATA-192,182,182,590,0,102,8 
DATA-69,64,62,182,52,0,102 
DATA.0,102,182,182,102,126,8 
DATA-2,68,102,124,182,124,98 
DATA-0,602,102,124,1@2,124,96 
DATA-B,B,1,9,15,16,19 
DATA.21,25,0,256 


Listing. Umlaute und »ß« in eigenen Programmen 








Programm im Hintergrund 


wird es bestätigen: Interrupts bei 

Mikroprozessoren sind eine 
feine Sache. Bestes Beispiel für einen 
Interrupt ist eine Tastaturabfrage. Man 
läßt den Prozessor an irgendeiner Auf- 
gabe still vor sich hin arbeiten. Erst 
wenn eine Taste gedrückt ist, wird der 
Prozessor von seiner Aufgabe losge- 
rissen, um die Taste abzufragen und 
ihren Code zum Beispiel in einem 
Tastaturpuffer zu speichern. Ohne 
Interrupt könnte der Prozessor nichts 
anderes tun, als ständig in einer Pro- 
grammschleife die einzelnen Tasten 
zu überprüfen. Der Prozessor könnte 
also nur diese eine Aufgabe erledigen, 
und solange keine Taste gedrückt 
wird, würde er keine effektive Arbeit 
verrichten. Die Rechenzeit wäre ver- 
schenkt. 

Damit ein Programm aber auch auf 
relativ seltene Ereignisse reagiert - 
wie zum Beispiel den Druck auf eine 
Taste - ohne dabei einzig und allein 
diese Aufgabe wahrzunehmen, haben 
die Entwickler der Mikroprozessoren 
die Interrupts eingebaut. Der 6502 ın 
den Atari-Computern hat davon gleich 
vier verschiedene. Zum ersten gibt es 
den Reset. Mit ihm wird dem Prozes- 
sor mitgeteilt, wo er beim Einschalten 
des Computers sein Programm findet. 
Zum zweiten hat der 6502 einen Inter- 
rupt eingebaut, der sich IRQ nennt, 
Interrupt Request, auf Deutsch: Jetzt 
soll ein Interrupt ausgeführt werden. 
Im Gegensatz zum Reset läßt sich der 
IRQ abschalten. ' 

Der dritte Interrupt ist als Hilfsmittel 
für Programmierer gedacht. Beim 
6502 gibt es einen Assembler-Befehl, 
der ebenfalls einen Interrupt auslöst: 
»BRK«, Break. Damit läßt sich bei der 
Fehlersuche das Programm an kriti- 
schen Stellen unterbrechen, um so 
Hinweise auf einen Fehler zu bekom- 
men. 

Der letzte Interrupt beim 6502 ist bei 
den Atari-Computern gleichzeitig der 
interessanteste; gemeint ist der Non 
Maskable Interrupt, der »NMil«. Wie 
der Name schon sagt, läßt er sich vom 
Prozessor nicht abschalten, wenn 
also ein NMI auftritt, muß der Prozes- 
sor darauf reagieren. 

Bei Atari hat dieser Interrupt zwei 
Funktionen: Zum einen wird damit ein 
sogenannter Display List Interrupt 
ausgeführt (wird an anderer Stelle in 
dieser Ausgabe besprochen). Zum 
anderen gibt es im Atari den »Vertical 
Blank Interrupt«“: VBLANK-Interrupt. 
Jedesmal, wenn im Fernsehgerätoder 
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3 eder Assembler-Programmierer 


In der Interrupt-Verarbeitung 
besitzt kaum ein Computer so 
viele Fähigkeiten wie der Atari 
XL. So kann man zum Beispiel 
im Takt des Bildschirmaufbaus 
ein Interrupt auslösen und 
damit ein Programm steuern. 


Monitor der Elektronenstrahl anfängt, 
ein neues Bild zu zeichnen, wird die- 
ser Interrupt ausgelöst. Im Betriebs- 
system des Computers liegt nun eine 
spezielle Interrupt-Routine, die 
dadurch aufgerufen wird und ver- 
schiedene Aufgaben übernimmt: die 
VBLANK-Routine. 

Dazu ein Beispiel: Schalten Sie 
Ihren Computer ein. Sie befinden sich 
jetzt im eingebauten Basic. Geben Sie 
nun folgenden Befehl ein: 

BSEICOLOR 2,0,0 

Nachdem Sie <RETURN> 
gedrückt haben, wird der Bildschirm 
schwarz und die Schrift zeichnet sich 
hellgrau ab. Bis hierhin verläuft alles 
wie gewohnt. Der Basic-Interpreter 
erkennt in »Setcolor« den Befehl, die 
Farbe auf dem Bildschirm zu verän- 
dern. Dazu schaut er sich die Zahlen 
hinter dem Befehl an, wandelt sie um 
und schreibt sie in eine spezielle Spei- 
cherstelle, die für die Farbe verant- 
wortlich ist. Nun könnte man auf die 
Idee kommen, selbst direkt diese 
Speicherstelle mit Hilfe des »POKE«- 
Befehls zu verändern. Schließlich 
braucht der Interpreter dann nicht erst 
die Werte hinter dem Setcolor-Befehl 
umzurechnen, und man spart 
dadurch Zeit. Machen wir das einmal: 
POKE 53272,50 

Die Speicherstelle 53272 ist dabei 
für die Hintergrundfarbe beim Textmo- 
dus verantwortlich, und der Wert 50 
entspricht der Farbe rot. Theoretisch 
müßte der Bildschirm nun von 
schwarz auf rot umschalten. 

Mitnichten: Der Bildschirm bleibt 
schwarz. Nachdem Sie <RETURN> 
gedrückt haben, flackert der Bild- 
schirm bestenfalls kurz rötlich auf. Wie 
erklärt sich das? 

Hier kommt die VBLANK-Routine 
ins Spiel. Diese holt sich aus einer 
bestimmten Speicherstelle im Compu- 
ter einen Wert und schreibt diesen 
dann in die Speicherstelle, die für die 
Farbe verantwortlich ist. Da die 


VBLANK-Routine im Takt des Bild- 
schirmaufbaus aufgerufen wird, alle 
50stel Sekunde, wird die Speicher- 
stelle mit der Bildschirmfarbe in kur- 











zen Zeitabständen neu beschrieben. 
Die Speicherstelle, aus der der Wert 
geholt wird, nennt sich »Schattenregi- 
ster«. Wenn man also die Bildschirm- 
farbe direkt umschalten will, muß man 
den Farbwert direkt in das entspre- 
chende Schattenregister schreiben. 
Sie werden sich jetzt mit Recht fragen, 
wozu dieser ganze Aufwand qut sein 
soll. 

Um bei diesem Beispiel zu bleiben: 
Würde es den VBLANK-Interrupt nicht 
geben, und würde man die Farbe 
direkt umschalten, so würde dies 
meist dann geschehen, wenn sich der 
Elektronenstrahl gerade mitten auf 
dem Bildschirm befindet. Das Bild 
würde kurz flackern. Um dies zu ver- 
meiden, schreibt man den Wert in ein 
Schattenregister, und erst beim näch- 
sten VBLANK wird die Bildschirm- 
farbe umgeschaltet. 


Mit folgendem Befehl verändert 
man das Schattenregister: 
POKE 710,50 

Sobald Sie <RETURN> drücken, 
wird der Bildschirm rot. Speicherstelle 
710 ist also das Schattenregister für 
die Hintergrundfarbe beim Textmo- 
dus. Für die anderen Setcolor-Befehle 
gibt es entsprechende Register: Set- 
color 0 hat Speicherstelle 708, Setco- 
lor 1 hat Speicherstelle 709, Setcolor 3 
Speicherstelle 711 und Setcolor 4 hat 
Speicherstelle 712. 

Mit den Speicherstellen, die direkt 
die Farbe umschalten, läßt sich noch 
eine nette Spielerei durchführen: 
Geben Sie folgendes kleine Pro- 
gramm genau so ein, wie es hier 
gedruckt ist, und lassen Sie es laufen. 


100 POKE 53272,0 
110 REM 

120 REM 

130 POKE 53272,50 
140 GOTO 100 


Ist das für reines Basic nicht ein net- 
ter Effekt? Spaßeshalber können Sie 
Zeile 110 löschen und das Programm 
dann laufen lassen. | 

Die VBLANK-Routine hat noch wei- 
tere Funktionen. Wußten Sie zum Bei- 
spiel, daß der Atari in den Speicher- 
stellen 18, 19 und 20 eine Uhr einge- 
baut hat? Speicherstelle 18 wird im 
50stel Sekundentakt erhöht. Wenn 
diese dann wieder bei Null anfängt, 
wird Speicherstelle 19 erhöht, und 
deren UÜberlauf in Speicherstelle 20 
registriert. So lassen sich mit ein- 
fachen Mitteln in eigene Programme 
Zeitabfragen einbauen. 








Über die Uhr wird noch eine weitere 
interessante Funktion des Computers 
gesteuert. Sie tritt jedesmal dann in 
Aktion, wenn beim Computer länger 
als zirka sieben Minuten keine Taste 
mehr betätigt wurde. Dann nämlich 
beginnt der Computer die Farben zum 
Schutz des Bildschirms völlig zufällig 
zu verändern. Dieser »Attrakt Mode« 
genannte Zustand beginnt immer 
dann, wenn Speicherstelle 77, die im 
Taktvon Speicherstelle 20 erhöht wird, 
den Wert 127 überschreitet. Bei jedem 
Tastendruck wird Speicherstelle 77 
wieder auf Null gesetzt, und die Far- 
ben hören auf, sich zu verändern. 
Geben Sie folgende Zeile ein: 


Nachdem Sie <RETURN> 
gedrückt haben, schalten die Farben 
um. 

Neben diesen Funktionen führt die 
VBLANK-Routine noch viele weitere 
Aufgaben aus. Zum Beispiel wird der 
Joystickanschluß ausgelesen und in 
die Speicherstelle 273 für Joystick O 
und Speicherstelle 279 für Joystick 1 
übertragen. 

Die VBLANK-Routine übernimmt 
allgemein alle Aufgaben, bei denen es 
egal ist, ob sie sofort oder höchstens 
eine 50stel Sekunde später ausge- 
führt werden. Da der VBLANK-Inter- 
rupt immer im nicht-sichtbaren Teil 
des Bildschirms ausgeführt wird, ware 


eigene Aufgaben einsetzen könnte. 
Zum Beispiel ließe sich bei der Player- 
Missile-Grafik damit ein Player ruck- 
frei über den Bildschirm bewegen. 

Voraussetzung dafür ist aber, daß 
man sich in der Maschinensprache 
des 6502 gut auskennt, denn die 
VBLANK-Interrupts sind extrem zeit- 
Kritisch und müssen unbedingt in 
Maschinensprache programmiert 
werden. Ganz nebenbei ist es auch 
sehr kompliziert, zum Beispiel ein 
Basic-Programm von einem VBLANK- 
Interrupt aus aufzurufen. 

Zunächst einmal muß festgelegt 
werden, wo die VBLANK-Interrupt- 
Routine stehen soll. Dann teilt man 
dem Computer mit, wo sich diese Rou- 








Bas4n 
Aa&50 
ul Pater 
20478 
lu Petzl) 
BOAFD 
Dar’ag 
50718 
53728 
29738 
52740 
29758 
Ba7&s0 
22770 


DO7S0 


209770 
allzeit lt 
D0818 
BaszE 
DaB30 
Ba340 
BasSg 


DBS&88 ; 


aa870 
DOSBO 
20870 
289708 
BAFI1E 
BOFTB 
209730 
20748 
DOFSB 
BOFAD 
DaF77O 
BOF3R 
BOFFE 
2B1Boo 
Q1210 
B122B 
812030 
01840 
81050 
01048 
170 
2818808 
81058 
21100 
81110 
01120 
81130 
01148 
81150 
01140 
811708 
01180 
811978 
081208 
01218 
01220 
81230 
D1248 


AND 
sTA 
LDA 
AND 
CcLC 
ADC 
ASL 
ECLC 
ADE 
STA 
LDA 
ADE 
STA 
_DY 
LDA 
sTA 
INY 
LDA 
STA 


#3 
SNDADR 
RANDOM 
#2 


SNDADR 


#SOUNDS 
SNDADR 

#0 

/SOUNDS 
SNDADR+1 
#2 
(SNDADR)> „Y 
DISTOR 


(SNDADRI „Y 
AUDFi 


; AUSWAEHLEN DER 
; LAUTSTAERKETABELLE 


LDA 
AND 
STA 
ASL 
sta 
LDA 
ASL 
ASL 
ELE 
ADC 
CLC 
ADC 
STA 
LDA 
ADC 
STA 
LDA 
5STA 


RANDOM 
#1 
VOLADR 


VOLADR+1 
VOLADR 


VOLADR+1 


#VOLTAB 
VOLADR 
#2 
/VOLTAB 
vOLADR-+1 
#2 
VOLFNT 


TON ERZEUGEN 


[ Bi 1 2 


Eu 
VBLANK1 
LDY VOLPNT 
LDA (VOLADRI ,Y 
ORA DISTOR 
STAR AuDci 


ur 7 7 


LAUTSTAERKE VERÄENDERN 


INC WOLFNT 
JMP ZKITVEW 
- 


HILFSSFPEICHERSTELLE 


VOLPNT 
DISTOR 


; SOUNDTABELLE 


.H5 88 
„HS 38 


Assemblerlisting »Blastsound« für alle, die’s genau 


POKE 77,128 es schön, wenn man den Interrupt für 
Ok. 2024: 29 93 
2826: 65 80 
DEZBID Ser 2028: AD BA D2 
Baa20 :* * zB2ZB: 2702 
Daa3d ;= BLASTSOUND * 2B2ZD: 18 
DBAD4O ;* * ZBZE: 55 88 
BAOSB ;* 12.1.1985 * 28350: BA 
BUBEN :* * 2831: 18 
Ba070 ;* Henrik Fisch * 2932: 67 7D 
BEOBR ;* * 2054: 85 80 
BB nr 20354: AF 00 
BBIBO ; 2039: &7 20 
B211@ ; Dieses Programm simuliert zB3A: 85 B1 
BQ120 ; den Sound eines bekannten 2835C: Ad B8 
201358 ; und beruehmten Spiels ZB3SE: Bi 88 
22140 ; 2840: BD 7C 208 
Ba1SQ ; OS -— EQUATES 2045: C8 
Balaß 5; 2944: Bi 88 
224: BB1L7O VVELKD .EQ 224 2846: 8b BO DZ 
E452: BBLSNO XITVBV „ED $E4A2 
E474: BRIFB WARMSV „EG $E474 
BUZOR ; 
R2@Z1B ; HARWARE REGISTER 
DBZZ0B ; 2049: AD BA DZ 
D2O8: DB223Q AUDFI „EU #D288 z2B4Cc: 27 81 
D281: 20240 AUDCI .EO #D201 ZB4E: 85 82 
D28A: 29258 RANDOM „EG £D28A 2858: Bf 
D4BE: B2z&Q0 NMIEN „EU £D4BE 2851: B5 385 
2OZ7O ; 2055: AS 82 
BRZBO ; VON DIESEM PROGRAFMM BENUTZT 2Ba355: BA 
DOZFO ; 2856: BA 
DSB: BOF5BN SNDADR .EO #88 2057: 18 
BOBS2: BBZ10 VOLADR .EO #82 2059: 65 83 
Ba5Z0 z zu5A: 18 
20338 ; FROGRAMMSPEICHERUNG 2BmS5B: 67 897 
DO340 ; BSD: 85 82 
20358 „OR #2088 ZuSF: AF DO 
BuFsB „TA FZBBR zu61: 67 208 
803570 „.TF "D:BLASTSND. COM" 2055: 85 835 
DR3BR ; 2B55: AF 80 
20578 ; INITIALISIERUNG 2047: BD 7B 28 
Da4aE ; 
Pa41B START 
z2Ba0: AP DO DO4Z0 LDA #0 
zB82: BD BE D4 0990450 STA NMIEN 
zBaS5: AF7 1A BR44Q0 LDA #VELÄNK Bär: AC 7B 28 
2867: BD 24 BZ 39450 STA WVBELKED 2B5Db: Bi 82 
zu0A: AF 20 BRA50 LDA /VBLANK 2085F: Gb 7C 28 
zu0C: BD 25 82 98472 STA WVBLKD+1 2072: BD Bi D2 
zBOF: AF7 40 Bas LDA #+40 
zB1i1l: SD BE D4 89490 STA NMIEN 
2014: A? 04 BBSER LDA #65 
2015: 8D 7B 28 B851B S5STA YOLPNT 2875: EE 7B 28 
2019: 50 Ba528 RTS 2078: 4C 42 E43 
aus3ß ; 
29540 ; HÄAUPFTPROGSRAMM 
BBSS5SB 5 
BESSB VBLÄNK 2B97B: BU 
za1A: Ab 7B 28 88578 LDA WOLPNT 207C: 28 
z2B1D: C7 B& BRS5BB CMP #5 
2u1F:r DO 49 BRSPE BNE VELANKI 
BAR 5 
DB61B ; AUSWAEHLEN DES SOUND’S 
Bas2E 5; 
2021: AD aA D2 29638 LDA RANDOM wissen wollen 
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a 

SOUNDS 
„HS 2005 
„HS 2807 
„HS 8082 
„HS 80903 
„HS 2095 
„HS SOFF 


—— Symbol table --—- 


D2Q1: 
D>OR: 
207C: 
DABE: 
D2OA: 
ADB: 
ZaA7D: 
2B00: 


AUDC1 
AUDFi 
DISTOR 
NMIEN 
RANDDHM 
SNDADR 
SOUNDS 
START 


Frogrammname 
Laenge 


BaBR: FF ag 
DO0B:8D D4 
2019: A9 SD 
BB18:GE A? 
2020: AD 
D028:DA 
0030: D2 
2038: 597 


:D=: BLASTSND. COM 
10 Bytes 


28 
A? 
25 
5 


£9 | 


25 
18 


28 


<30> 
<Au> 
<“AS>> 
“82> 
<D5> 
7C> 
<7a> 
<EA> 


VOLUMENTABELLE VBLANK 
VBLANKI 
VOLADR 
VOLPNT 
VOLTAB 
VVBLKD 
WARMSW 
KITVBV 


BE44:85 DB 
2048: 28 8 
2050: A D1 
2959:83 DA 
2950:18 85 
Das8: 28 A? 
2070: AC Bi 
087B:8D EE 
2BB0:E4 22 
BR38:02 25 89 
ga9n: DE [7,9 
Ba9a:92 238 


<157> 
ee 
<c2> 
“B2> 
<23> 
<C1> 
sdöb> 
<öB> 
<2B> 
543 
<cCA> 
“E?7> 


OLTAB 
„HS BEBLOAUSBSD4S 
.H5 859594020098 


STARTADRESSE 
DES PROGRAMMS 


En at 


„DR #ZE2Z 


.DA START Assemblerlisting »Blast- 


sound« (Schluß) »Blastsound« als AMPEL-Listing 





Ük- 6235: AF 80 Basa2a LDA #58 
0625: SD SF B& Bas STA RICHTG 
DBOZIE SH 0428: 4C 52 B& Bas JMP DUNKLRI 
BOBZE ;* = AN&5SO HELLERI 
DRRSEB s+ FARBDIMMER E D&ZB: EE ZE 96 BB&&B INC FARBE 
BBa40 ;* * D&2ZE: AD SE D& BO472 LDA FARBE 
2OBS2 ;* 22.7.1987 * 25531: 8D 18 DB Basb2 STA COLFF?2 
BOGAD ; = # A&354: 46 SB 04 B0490 JMP EXIT 
BBB7B ;* Henrik Fisch # Daran : 
DOBBRO ;=* * 20710 ; FARBE WIRD EINE 
BEB7G Re 28728 ; STUFE DUNKLER GESTELLT 
aloe ; Bars ; j 
28118 ; Dieses Programm wechselt 20748 DUNKLR 
28120 ; im VBLÄANK-Interupt N&37: AD SE OS 309750 LDA FARBE 
29130 ; die Hitergrundfarbe DEFA: 297 BE Da7aB AND #3E 
80140 ; eines GRAPHICS B-Bildschirms Bössc: DA 14 207780 BNE DUNKLR1 
22158 ; BASE: AF 00 Ba78B8 LDA #0 a 
B2iäB ; HARDWARE REGISTER 2540: BD SF D& BE7FB STA RICHTG 
20170 ; 06545: AD SE B& BOBBRB LDA FARBE 
Da18: Bi COLFPFZ „EB DB18 Bass: 18 BBBia CLE 
DABE: BBIFE NMIEN „EB £DARDE B547: 597 19 BasZza ADC #18 
2a2BB ; 06497: BD SE 84 DRa3a 5TA FARBE 
Ba210 ; 05 — EQUATES Bös4Cc: BD 158 DR BBSag STA COLPFZ2 
B0220 ; Bäaäf: Sc SB D& BOBSSa JMPF EXIT 
B224: 282380 WVBLKD „ED #224 BOS50 DUNKLRI 
E452: Ba24B XITVBV „EO $E482 0552: CE SE 84 BOS7B DEC FARBE 
DB250 ; 0655: AD SE B& Bmssa LDA FARBE 
Ba240 ; PRÜGRÄAMMABSPEICHERUNG 2558: BD 18 DE Busse 5TA COLPF?2 
20278 ; BEFBR ; 
ga280 „OR 3688 DaF10 ; VERLASSE VBLANK-ROUTINE 
BO2F08 .TA #409 209720 ; 
Bea308 „.TF "D:FARBDIM. COM" BR93B EXIT 
BBS1B ; N&S5B6: AC 52 E4 80740 JIMP XITVBV 
29328 ; INITIALISIERT DIE Da950 ; 
BB330 ; VBLÄANK-RODUTINE | Aura ; VON DIESEM PROGRAMM BENUTZT 
20340 ; DaF ; 
Ba3>S58 INIT D&ESE: DO BOF7BEB FARBE .HS 98 
Abe: AI DR 2R55B LDA #0 DB&ESF: 80 GBF7FB RICHTG .HS 88 
2492: BD BE D4 805708 STA NMIEN gioee ; 
25095: AP 15 23508 LDA #VBLANK B1B10 ; STARTADRESSE 
507: BD 24 82 BO5FEd STA WWVBLKD 01020 ; 
BEA: A Dh BBARO LDA /VBLANK B1a308 „OR $#2E2 
Radlc: 8D 25 BZ BR418 STA VVBLKD+1 BZE2Z: BO B& Bıaaa „DA INIT 


BEOF: AF 40 DO420 LDA #$40 
9511: BD BE D4 BA438 STA NMIEN -——— Symbol table —- 
B&i4: 60 Ba44Q RTS D®18: COLPFZ 
ag4so ; 8637: DUNKLR 
AQ46B ; VBLANK-ROUTINE 8852: DUNKLR 
002472 ; WIRD BEI JEDEM VBI B6SB: EXIT 
B048B ; ANGESPRUNGEN BASE: FARBE 
22490 ; @&i1A: HELLER 
BBSEB VBLANK B&2B: HELLERI 
9615: AD SF 86 BRS1B8 LDA RICHTG BaQB: INIT 
D618: 30 1D BRBS?22 BMI DUNKLR D4QE: NMIEN 
20530 ; BaSF: RICHTG 
B2BS549 ; FARBE WIRD EINE B&15: VBLANK 
aassn ; STUFE HELLER GESTELLT 2224: VVBLKD 
02560 ; E462: XITVBV 
22572 HELLER 
BöiA: AD SE Da Q9SSB LDA FARBE Ok. 
@61D: 29 DE BES?B AND #$E 
DöiF: C9 BE Bus22 CMP #$E 
86521: DO 28 @B&s1lB BNE HELLERI Assemblerlisting zum »Farbdimmer« 
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Programmname :D:FARBDIM. COM 
Laenge :184 Bytes 


Baua:FF FF OO B& SO Da AFP BB <7C> 
DOB8:8D BE Da AF 15 ED 24 B2 <7C> 
2B10:AF B& BD 25 BZ AF AD BD <2A> 
2BB19:BE D4 58 AD SF B& 30 1D <869> 
B020:AD SE 84 297 BE C9 BE Da <11> 
DuZe:BE AT 80 SD SF 96 A4C 32 <14> 
a030:0& EE JE B& AD 5E B4 BD <32> 
288358:18 DB 4C SE 94 AD SE <5D}> 
2049:27 BE DO 14 A9 Ba BD SF <532> 
2048:06 AD SE B& 18 57 18 8D {D2> 
2050:5E B& ED 18 DE 4C SB <SE> 
BaSs: CE SE 36 AD SE B& BD 18 <SE> 
DAR: DA 4C 32 E4 DO On Da Ba <DD> 


»Farbdimmer« im AMPEL-Format 


tine befindet. Das macht man über die 
Speicherstellen 546 und 547 ($222 
und $223) oder 548 und 549 ($224 und 
$225). Der Computer springt bei 
einem VBLANK-Interrupt nacheinan- 
der zu den beiden Adressen, die er in 
diesen Speicherstellen liest. In den 
ersten beiden Speicherstellen steht 
die Adresse der eingebauten 
VBLANK-Routine. Die zweite Adresse 
ist normalerweise Nebensache; mit 
ihr läßt sich ganz einfach eine eigene 
Routine direkt an die eingebaute 
VBLANK-Routine anhängen. 

In 548 und 549 wird also die Start- 
adresse der eigenen Routine 
geschrieben. Vorher sollte man 
jedoch den Interrupt abschalten, denn 
wenn der Interrupt ausgerechnet dann 
auftritt, wenn das Low-Byte der 
Adresse bereits in 548 steht, das High- 
Byte jedoch noch nicht übertragen ist, 
springt der Computer zu dieser fal- 
schen Speicherstelle und hängt sich 
meistens auf. 

Wahrscheinlich werden Sie sich 
jetzt fragen, wie Sie einen »Non Mas- 
kable Interrupt« abschalten sollen. 





Der Atari hat jedoch ein Register, mit 
dem sich auch dieser Interrupt verhin- 
dern läßt. Die Speicherstelle liegt bei 
Adresse 54286 ($D40E). Löscht man 
hier Bit 6, so ist der VBLANK-Interrupt 
abgeschaltet. Erst jetzt setzt man die 
Adresse auf die eigene Routine. 
Nachdem die VBLANK-Routine 


abgeschlossen ist, sollder Programm- | 


ablauf wieder aufgenommen werden. 
Dafür gibt es einen speziellen Maschi- 
nenbefehl des 6502, den »RTlk«, 
»Return from Interrupt«. Dieser darf 
jedoch nicht verwendet werden, denn 
bei jedem VBLANK-Interrupt sichert 
das Betriebssystem die Register des 


6502 auf dem Stack. Diese stehen | 


damit dem Programmierer für die 
Dauer der Routine allesamt zur Verfü- 


gung. Nachdem die Routine ihre | 


Arbeit beendet hat, müssen diese 
Registerinhalte jedoch wieder restau- 
riert werden, damit das unterbrochene 
Programm ohne Probleme weiterar- 
beitet. Für diese Aufgabe gibt es im 
Betriebssystem ebenfalls eine Rou- 
tine. Sie nennt sich »XITVBV« und wird 
aufgerufen, indem man in Assembler 
zur Adresse 58466 ($E462) springt. 
Dieses Programm verläßt danach die 
Interrupt-Routine. 

Die beiden Programme demonstrie- 
ren den VBLANK-Interrupt. Das erste 
Programm läßt im Textmodus nachein- 
ander alle Farben aufleuchten. Das 
zweite Programm läßt eine Klangfolge 
ertönen, die einem bekannten Spiel 
nachempfunden ist. Wie 
VBLANK-Interrupt üblich, lassen sich 
trotzdem alle Funktionen des Compu- 
ters weiterhin benutzen. Anhand der 
Assembler-Listings sehen Sie, wie die 
Programme funktionieren. Die Pro- 
gramme lassen sich nur mit der 
<RESET >-Taste abschalten. (hf) 


Wichtige Systemvariablen 


Adresse 
Hexadezimal 


Erklärung 


Werte größer 127 leiten den Attrakt-Mode ein 
Entspricht SETCOLOR L.... 
Entspricht SETCOLOR 1... 
Entspricht SETCOLOR 2... 


Entspricht SETCOLOR 3... 


Entspricht SETCOLOR 4.... 

Farbregister für COLOR4 

Farbregister für COLORO 

Farbregister für COLOR1 

Farbregister für COLOR2 \ 
Farbregister für COLOR3 

Wenn Bit 6 gelöscht ist, wird der VBLANK- 
Interrupt abgeschaltet 

System-Timer, wird in 50stel-Sekunden- 
Schritten erhöht 

Überlauf von RTCLOK Speicherstelle 18 
Überlauf von RTCLOK Speicherstelle 19 
Beginn einer VBLANK-Routine, die nach der 
Systemroutine ausgeführt wird 


Beginn der System-VBLA 


\ IK-Routine 


Beendet eine VBLAN K-Routine 





beim | 


Taktısche Gefechtssimulation 
3600 Felder großes Spielfeld 
mit topografischem Gelände 
70 Waffensysteme aus WKII 
1-2 Spieler, Spieldauer 5 Std. 
Deutsches Handbuch 


Apple, C64, Atari, IBM, Amiga 
DM 99,- | 


Strategische Simulation im 
Südpazifik 1942-1943 
79 Schiffsklassen, Träger, 
Schlachtschiffe, Zerstörer etc. 
Deutsches Handbuch 


1-2 Spieler, Spieldauer 50 Std. | 


Apple, C64 DM 129,- 


RUSSIA 1941-45 für Fort- 
geschrittene. Hb. engl. 


Apple, C64 DM 139,- 
30 weitere Strategie- und 


Phantasiespiele ab Lager 
lieferbar. Katalog 1,- Bfm. 


MÜLLER 


COMPUTER—-SERVICE 


Postfach 2526 - 7600 Offenburg 
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n Programmiersprachen für 
A: Atari-Computer herrscht 

bislang kein Mangel. Von 
Basic, von dem es bislang sieben ver- 
schiedene Interpreter gibt, über Pas- 
cal zu Assembler wird alles angebo- 
ten, was das Herz begehrt. Sogar 
Forth und die KI-Sprache Lisp sind für 
die kleinen Computer erhältlich. Nur 
eine Sprache steht bislang nicht in 
einer vernünftigen Implementation zur 
Verfügung; C. Gut, es gibt den »Deep 
Blue C«-Compiler von Antic und den 
»C/65«-Gompiler von OSS. Beide Pro- 
gramme weisen aber den Nachteil auf, 
daß sie weder die Standardfunktionen 
von C enthalten, noch daß sie beson- 
ders Speicherplatz-optimierend arbei- 
ten. Zudem compilieren sie ein Pro- 
gramm gähnend langsam. 





Der lichtschnelle 
C-Compiler 


Es grenzt fast an ein Wunder, daß 
doch noch eine Firma einen C-Com- 
piler entwickelte und ihn für die 
kleinen Atari-Computer verfügbar 
machte. Das Produkt nennt sich 
»Lightspeed C«-Compiler von Clear- 
star Softechnologies. Das Programm 
wird auf einer Diskette geliefert und 
benötigt 48 KByte Speicher. Es läuft 
nicht nur auf den XU/XE-Computern, 
sondern auch auf den alten 400er/ 
800er-Computern von Atari. 

Soviel vorweg: In dem Compiler ist 
der gesamte von Kernighan und Rit- 
chie vorgeschlagene Sprachumfang 
enthalten. Damit hat man eine 
moderne Sprache zur Verfügung, die 
vollständig kompatibel zu anderen 
Computern ist. Auch wenn es sich 
lächerlich anhört, aber ein in C 
geschriebenes Programm läuft auf 
Computern wie Atari ST, Amiga oder 
IBM-PC genauso wie auf Mini- und 
Großcomputern wie VAX und Cray, 
und dank des Lightspeed-Compilers 
nun auch auf dem kleinen Atari. Eine 
Veränderung muß man allerdings in 
Kauf nehmen. Da der Atari die 
geschweiften Klammern nicht kennt - 
diese sind bei jeder Funktionsdefini- 
tion in C notwendig - werden diese 
durch Klammern mit vorangestelltem 
Dollar-Zeichen ersetzt. 

Selbstverständlich arbeitet das Pro- 
gramm mit einer in den 130 XE einge- 
bauten RAM-Disk zusammen. Die 
Compilier- und Linkzeiten verringern 
sich dadurch weiter. Dazu ein paar 
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Neues aus den USA 


Wenn auch die kleinen Atari- 
Computer in Deutschland rela- 
tiv stark vernachlässigt werden, 
in den USA ist dies nicht so. Die 
interessantesten neuen Pro- 
dukte stellen wir hier kurz vor. 


Daten: Der Lightspeed-C-Compiler 
benötigt zum Compilieren eines Prim- 
zahlen-Programms, das als Source- 
Text auf der Diskette 1 KByte belegte, 
eine Minute. Dabei entsteht ein 
Maschinenprogramm, das nur 3 Sek- 
toren auf der Diskette beansprucht. 
Diese Zeiten und Programmlängen 
lassen sich mit einem mitgelieferten 
»Öptimizer« weiter verbessern. 
Tatsache ist, daß mit dem Light- 
speed-C-Compiler auf dem Atari eine 
moderne Programmiersprache zur 
Verfügung steht, die den Vergleich mit 
anderen Implementationen auf größe- 
ren Computern nicht zu scheuen 
braucht. Außerdem läßt sich jetzt 
schon ein wenig im voraus üben, wenn 
später auf ein größeres System umge- 
stiegen werden soll, wie zum Beispiel 
auf einen Atari ST oder einen Amiga. 
Der Compiler ist für 39,95 Dollar bei 
folgender Adresse erhältlich: 
Clearstar Softechnologies 
1501 Wood Avenue 36 
Sumner, WA 98390 
U.S.A. 


RAM-Disk, 
paralleler Port und 
Modem-Anschluß 


Ein weiteres interessantes Produkt 
stellt die Firma ICD her. Diese Firma 
sollte man als Atari-8-Bit-Enthusiast 
sowieso im Auge behalten. Das Pro- 
dukt nennt sich »MIO-Board« und wird 
an den parallelen Bus der XL-Compu- 
ter angeschlossen. 

Zum Beispiel ist auf der Platine ein 
CGentronics-Port und ein RS232-kom- 
patibler serieller Anschluß enthalten. 
Damit lassen sich Modems betreiben 
(in Deutschland noch nicht zugelas- 
sen), oder Drucker anschließen, die 
diese Art der Datenübertragung ver- 
langen. Am interessantesten ist 


jedoch die RAM-Disk, die in einer Ver- 
sion von 256 KByte und 1 MByte 
erhältlich ist. Die RAM-Disk wird von 
einem mitgelieferten DOS unterstützt 
und läßt sich beliebig in verschiedene 








Laufwerke aufteilen. Das Besondere 
an der RÄM-Disk ist, daß sich der 
Computer ruhig aufhängen darf. Bei 
einer normalen RAM-Disk ist deren 
Inhalt dann verloren. Da das MIO- 
Board aber eine separate Stromver- 
sorgung aufweist, ist ihr Inhalt auch 
nach dem Ein- und Ausschalten des 
Computers noch vorhanden. 

Die letzte Eigenschaft des MIO- 
Boards ist zugleich auch die erstaun- 
lichste Einrichtung. Es lassen sich bis 
zu 8 Harddisk-Laufwerke mit jeweils 
bis zu 16 MByte Speicherkapazität 
anschließen. Auch wenn diese Spei- 
cherkapazität für die kleinen Compu- 
ter unsinnig erscheint, so manches 
Mal wünscht man sich doch eine Fest- 
platte, besonders dann, wenn bei 
einem Programmiervorhaben zum 
hundertsten Mal die Diskette gewech- 
selt wird. 

Das MIO-Board ist bei 

ICD 

1220 Rock Street 

Rockford, IL 61101-1437 

U.S.A. 

für 199 Dollar mit 256 KByte und für 
349 Dollar mit 1 MByte erhältlich. 


Universelles 
Malprogramm 


Wenn ein neues Malprogramm vor- 
gestellt wird, muß es schon einiges 
können. Und wenn es sich durchset- 
zen soll, muß es wenigstens zu einem 
der drei bisher meistverkauften Mal- 
programme kompatibel sein (»Micro 
Painter» von Datasoft, »Atari Artist« 
von Ätarioder»Fun with Art«).»Blazing 
Paddles« von Baudville hält diesen 
Anforderungen stand. Es läßt sich mit 
einem Joystick, einem Grafik-Tablett, 
einem Lichtgriffel oder sogar mit Dreh- 
reglern betreiben. 

Blazing Paddles unterstützt im 
Gegensatz zu anderen Malprogram- 
men mehrere Grafikstufen. Neben 
den üblichen Befehlen zum Zeichnen 
von Linien, Kreisen und Boxen, zum 
Festlegen der Farben und zum Spei- 
chern und Laden von Diskette, besitzt 
es Befehle zum Laden von Bildern in 
den Formaten der oben angegebenen 
Malprogramme. Blazing Paddles ist bei 
Baudville 
1001 Medical Park Drive SE 
Grand Rapids 
MI 49506 
U.S.A. 
für 34,95 Dollar erhältlich. 
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Komponieren ohne Noten 


asiıc heißt das neueste Pro- 
gramm der Firma Rätz- 
Eberle. Dabei handelt es 


sich um einen softwaremäßigen 
Musiksynthesizer für die kleinen Atari 
XUXE-Computer. Solch ein Pro- 
gramm ist vor einiger Zeit schon ein- 
mal erschienen. Gemeint ist »The 
Soundmachine«, mit der sich fan- 
tastisch klingende Musikstücke ent- 
wicklen und in eigene Programme ein- 
binden lassen. Das Besondere an der 
Soundmachine ist aber ihre Benutzer- 
freundlichkeit. So wird fast alles mit 
dem Joystick gesteuert. Die einzelnen 
Noten eines Musikstücks lassen sich 
mit dem Joystick auf richtigen Noten- 
linien plazieren. Das setzt allerdings 
voraus, daß man Noten lesen kann. 
Der Ungeübte weiß mit dieser Darstel- 
lungsmethode wenig anzufangen. 
Masic soll diese Nachteile umgehen, 
indem für das Programm eine eigene 
Musik-Programmiersprache ent- 
wickelt wurde. 

Wenn man Masic bestellt, bekommt 
man eine Programmdiskette, die das 
Masic-Programm selbst sowie zwei 
Hilfsprogramme und eine 23 Seiten 
starke Anleitung enthält. Auf der 
Schutzhülle der Diskette ist der Name 
des Bestsellers zusammen mit einer 
Codenummer abgedruckt. Diese 
Nummer muß beim Start des Pro- 
gramms zusammen mit dem Namen 
in den Computer eingegeben werden. 
Nur wenn die Nummer und der Name 
mit den im Programm gespeicherten 
Daten übereinstimmen, ist Masic 
funktionsfähig. 

Nach diesem etwas kuriosen aber 
sehr anwenderfreundlichen Kopier- 
schutz - die Programmdiskette ist 
nicht weiter kopiergeschützt - wird 
man vom Programm nach der Tasta- 
turbelegung gefragt. Dies erscheint 
ein bißchen unsinnig. Warum sollte 
man schließlich eine Tastatur, an die 
man sich gewöhnt hat, plötzlich umbe- 
legen? Es wird jedoch verständlich, 
wenn man sich das Konzept von Masic 
etwas genauer anschaut. Nach dieser 
Eingabe befindet man sich nämlich im 
Editor von Masic. Hier wird, ähnlich 
wie bei einer normalen Programmier- 
sprache, das Musik-Programm einge- 
geben. Dabei läßt sich das Programm 
beliebig auf dem Bildschirm gestalten 
(siehe Bild). In der unteren Zeile des 
Editors werden ständig die Spalte und 
Zeile angezeigt, in der sich der Cursor 
gerade befindet. Schnappt man sich 
die Anleitung und liest die Bedienung 
des Programmeditors durch, so wird 








Nach Compilern für Programme 
gibt es in letzter Zeit Compiler, 
mit denen sich sehr gut klin- 
gende Musikstücke entwickeln 
lassen, die auch in eigene Pro- 
gramme einbindbar sind. 


sofort deutlich, warum der Program- 
mierer von Masic eine deutsche Tlasta- 
turbelegung sowie die Spalten- und 
Zeilenanzeige eingebaut hat: Der Edi- 
tor von Masic läßt sich gleichzeitig als 
Texteditor verwenden, zum Beispiel 


um Briefe zu schreiben. Der Autor des 


Handbuchs weist auch extra darauf 
hin, daß das Handbuch mit dem Masic 
Texteditor geschrieben wurde. 
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Doch der Hauptzweck des Editors 
liegt darin, Musikstücke einzugeben 
und Klänge zu erschaffen. Jedes 
Masic-Programm besteht aus einem 
Hüllkurventeil und einem Notenteil. 
Jeder der beiden Teile wird mit recht- 
eckigen Klammern eingeschlossen. 
Dazwischen dürfen beliebige Kom- 
mentare stehen. In ein Programm las- 
sen. sich Kommentare einfügen, 
indem davor einfach ein Semikolon 
gestellt wird. 

Eine Hüllkurve hat die Aufgabe, den 
Lautstärkeverlauf eines Klangs zu 
bestimmen. Ein Klavierklang zum Bei- 
spiel wird sofort sehr laut, sinktdannin 
der Lautstärke langsam ab und geht 
fast augenblicklich auf Null zurück, 
wenn die Taste wieder losgelassen 
wird. Im Gegensatz dazu ertönt ein 
Trompetenklang zwar auch sofort in 
voller Lautstärke, bleibt dann aber für 
die Dauer des Tons in der Lautstärke 
beständig. Zum Simulieren dieser 
Lautstärkeverläufe sind die Hüllkur- 
ven da. Da der Soundchip der Atari- 
Computer maximal 16 Lautstärke- 
werte verarbeitet, erfolgt die Angabe 
der Hüllkurven beim Masic auch in 
diesen 16 Werten. Die Hüllkurve 
besteht damit im Programm aus einer 
Folge von Zahlen. Jede Zahl stellt 
einen Lautstärkewertt zu einem 
bestimmten Zeitpunkt der Hüllkurve 
dar. Eine Hüllkurve setzt sich dabei 
aus maximal 255 Werten zusammen. 
Da das Masic-Programm zum Bestim- 
men der Notenlängen den VBLANK- 
Interrupt der Atari-Computer ausnutzt, 
ist ein Hüllkurvenschritt genau eine 
50stel Sekunde lang. Der Vorteil die- 
ser Hüllkurven-Programmierung liegt 
nun darin, daß nicht nur an- und 
absteigende Lautstärkeverläufe pro- 
grammiert werden können. Auch 
Effekte, wie zum Beispiel das An- und 
Abschwellen eines Tons bei einem 
Vibraphon oder das langsame Anstei- 
gen und dann plötzliche Äbfallen der 
Lautstärke bei einem Tonband, das 
rückwärts läuft, werden erzeugt. Der 
Nachteil dieser Programmierung 
besteht darin, daß alle Notenwerte 
umständlich in den Computer einge- 
tippt werden müssen und daß man bei 
jeder Anderung erst das ganze Pro- 
gramm neu starten muß, ehemanden 
Klang hört. Es gehört also etwas 
Übung dazu, einen Klang richtig 
schön zu »komponieren«. 

Der zweite Programmteil umfaßt die 
Notenwerte und verschiedene Steuer- 
kommandos, mit denen das Musik- 
stück abgespielt wird. Am Anfang 
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einer Notenfolge muß eine Sprung- 
marke stehen, damit das spätere Pro- 
gramm weiß, an welcher Stelle die 
Noten beginnen. Für jeden Notenwert 
wird die Dauer eines Tones und des- 


sen Notenhöhe eingegeben. Die 
Dauer umfaßt dabei eine ganze bis 
eine 32stel Note, mit allen ihren Zwi- 
schenschritten, wie zum Beispiel eine 
punktierte Achtelnote. Die effektive 
Dauer einer Note wird später im Pro- 
gramm angegeben. Falls nun eine 
Folge von Noten die gleiche Länge 
hat, brauchen die Notenlängen nuram 
Anfang dieser Folge bestimmt zu wer- 
den. Für alle anderen Noten nimmt 
das Programm dann automatisch 
diese Notenlänge an. Ein Stück, das 
nur aus Viertelnoten besteht, benötigt 
also nur einen Notenlängenbefenhl. 

Die Noten werden mit ihrem Namen 
eingegeben. Die Note »H« wird aller- 
dings nach amerikanischem Vorbild 
mit »B« notiert. Der Tonumfang 
erstreckt sich dabei über sieben 
Oktaven. 


Auch als Texteditor 
geeignet 


Die Anzahl der zu spielenden Noten 
eines Stücks ist nur durch den zur Ver- 
fügung stehenden Speicherplatz 
beschränkt. Der Editor stellt dabei 
maximal 17659 Speicherplätze zur 
Verfügung. Da der Editor auch zur 
Textverarbeitung eingesetzt werden 
kann, beansprucht jedes eingetippte 
Zeichen ein Byte. In der Anleitung 
steht über dem zur Verfügung stehen- 
den Speicherplatz eine Bemerkung, 
die die Freude an Masic ein wenig 
trübt. Sollte man einmal mehr Zeichen 
eingegeben haben, als Platz zur Ver- 
fügung steht, kann es sein, daß sich 
das Programm aufhängt. Das ist weni- 
ger schön, 
daran, daß wir eine Vorabversion von 
Masic zum Testen in der Redaktion zur 
Verfügung hatten. 


liegt aber womöglich. 


Neben der Tonhöhe und der Ton- 
dauer gibt es weitere Befehle in Masic, 
mit denen sich Musikstücke einfach 
programmieren lassen. Wie in ande- 
ren Programmiersprachen existieren 
zum Beispiel Sprungbefehle zur Pro- 
grammierung von Endlosstücken, 
sowie Unterprogrammaufrufe, damit 
ein und dieselbe Notenfolge nicht 
mehrmals eingegeben werden muß. 
Nebenbei bemerkt, spart das Spei- 
cherplatz. Wie schon angedeutet, gibt 
es einen Befehl, der die absolute 
Länge einer Note in 50stel-Sekunden- 
Schritten festlegt. Dann existieren 
Befehle, die Halleffekte, Glissandi- 
sowie Tremolo-Effekte erzeugen. Da 
dıe komponierten Musikstücke auchin 
eigene Programme eingebunden wer- 
den können, gibt es Wege, ein Musik- 
stück mit externen Ereignissen zu 
synchronisieren. Es ist zum Beispiel 
keine Schwierigkeit, in einem selbst- 
geschriebenen Spiel auf Knopfdruck 
ein Musikstück erklingen zu lassen. 

Das so zusammengestellte Musik- 
stück wird mit einer Tastenkombina- 
tion auf Diskette gespeichert. Eine 
andere lädt ein bereits gesichertes 
Stück wieder in den Speicher. Da 
Masic ein Compiler ist, muß jedes 
Musikstück zuerst kompiliert werden, 
bevor man es sich anhören kann. 
Einige eingefleischte Computerbesit- 
zer schrecken jetzt wahrscheinlich 
zurück, denn das Kompilieren von 
Programmen ist normalerweise eine 
zeitaufwendige und fehlerträchtige 
Angelegenheit. NichtsobeiMasic. Ein 
Knopfdruck genügt, um das Pro- 
gramm zu kompilieren, selten dauert 
dieser Vorgang länger als ein paar 
Sekunden. Einer weiterer Knopf- 
druck, und das Stück erschallt aus 
dem Lautsprecher eines angeschlos- 
senen Fernsehers oder Monitors. 

Mit Masic ist es aber auch möglich, 
eigenständig lauffähige Programme 
zu erzeugen, die dann vom DOS aus 
geladen werden und die Melodie 
abspielen. Dazu erteilt man kurz nach 
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DIE LEISTUWG DES 
LASERS VERRINGERN. 


dem Kompilieren einen Speicherbe- 
fehl. Auf der Diskette, die das Musik- 
stück aufnehmen soll, müssen zwei 
Files stehen, die im Lieferumfang des 
Programms enthalten sind. Diese 
Files stellen sozusagen das Runtime- 
Package von Masic dar. Beim Schrei- 
ben auf Diskette werden dann aus die- 
sen Files die Routinen herausgeholt 
und mit dem jeweiligen Musikstück 
verbunden. Auf der Diskette steht jetzt 
ein lauffähiges Programm, das das 
Musikstück abspielt. 


Compiliert auf 
Knopfdruck 


Im geschickt aufgebauten Hand- 
buch wird ausführlich erklärt, wie man 
derart erzeugte Programme in eigene 
Programme einbindet. 

Masic ist ein gut durchdachtes Pro- 
gramm, mit dem sich Musikstücke mit 
sehr professionellem Sound erzeugen 
lassen. Was andere Musikprogramme 
dieser Art versäumt haben, isthierein- 
gebaut worden. Die an sich hervorra- 
gende Idee, eine eigene Program- 
miersprache zum Gestalten von 
Musikstücken zu verwenden, leidet 
etwas unter der Tatsache, daß Musik 
doch eine sehr emotionale ÄAngele- 
genheit ist. Bei einem normalen 
Instrument wird jede Veränderung am 
Musikstück sofort hörbar. Bei Masic 
müssen erst verschiedenste Parame- 
ter eingeben werden, bis aus dem 
Computer Töne erklingen. Hat man 
jedoch erst einmal Erfahrungen im 
Schreiben von Musikstücken gesam- 
melt, oder steht gar ein Instrument zur 
Verfügung, mit dem sich Tonfolgen 
ausprobieren lassen, ist Masic ein 
ideales Mittel, Musik für die Atari- 
Computer zu komponieren. Wer 
Masic kaufen möchte, sollte sich an 
folgende Adresse wenden: Verlag 
Rätz-Eberle, Melanchthonstr. 75, 
Postfach 1640, 7518 Bretten. Das Pro- 
gramm kostet 49 Mark. (hf) 


EEE 
ICH DENKE, 
DAS SOLLTE 
ICH... 





Pascal mit 
Assembler-Power 








erheute ander Schule oder 
an der Universität zum 
ersten Mal eine Program- 


miersprache kennenlernt, beginnt in 
der Regel mit Pascal. Auch in den 
Schulen fängt Pascal an, sich im 
Informatik-Unterricht durchzusetzen. 
Das hat auch gute Gründe. Pascal ver- 
eint große Flexibilität und Geschwin- 
digkeit mit klarer Gliederung. Das ist 
neben der weitgehenden Standardi- 
sierung auch ein Grund, warum viele 
Software-Häuser ihre Programme in 
Pascal entwickeln. 

Aber gerade was das Lernen einer 
Hochsprache angeht, hat Pascal die 
Nase vorne. Man lernt von Anfang an, 
problemorientiert zu denken und die 
Aufgabe erst völlig zu verstehen, 
bevor man ans eigentliche Program- 
mieren geht. Das ist zwar am Änfang 
etwas frustrierend, erweist sich hinter- 
her aber immer als hilfreich. Einge- 
fleischte Pascal-Fans pflegen auf die 
Startschwierigkeiten zu antworten, 
daß man beim Laufenlernen auch 
mehr hingefallen als auf zwei Beinen 
gestanden sei. Aber das sei schließ- 
lich kein Argument, um sein ganzes 
Leben auf allen Vieren durch die Welt 
zu krabbeln. Wer will ihnen in diesem 
Punkt widersprechen? 

Pascal hat für den Einsteiger aber 
noch weitere Vorteile, da sich viele 
Sprachen an Elemente aus Pascal 
anlehnen. Der spätere Umstieg auf 
»C« oder »Modula 2« bereitet keine 
Probleme, weil sich diese Sprachen 
sehr ähneln. Pascal ist also in keinem 
Fall eine Sackgasse. 


Kyan contra Turbo? 


Wenn man die Entwicklung und Ver- 
breitung von Pascal betrachtet, findet 
man eine Art Generationenwechsel, 
der mit dem Erscheinen des legendä- 
ren »Turbo-Pascal« zusammenhängt. 
Früher dominierte »UCSD-Pascal« die 
Szene, das sich noch stark an die Vor- 
gaben des Pascal-Erfinders N. Wirth 
hielt. Doch mit der Entwicklung der 
Computer zeigtesich, daß man für den 
täglichen Einsatz mehr braucht, als 
man sich seinerzeit vorstellen konnte. 

Mit dem Auftauchen von Turbo- 
Pascal der bekannten Firma Borland 
wandelte sich die Pascal-Szene. Mit 
Turbo-Pascal hat diese Sprache den 





Es gehört zu den weitverbreite- 
ten Vorurteilen, daß es auf den 
8-Bit-Ataris keine leistungsfähi- 
gen Programmiersprachen gibt. 
Kyan-Pascal widerlegt dies! 


Sprung aus dem Schatten der reinen 
Lehrsprache geschafft. Heute gibt es 
eigentlich keine Anwendung, die nicht 
auch in Pascal geschrieben werden 
kann. Für die PCs gibt es sogar Spiele, 
die in Pascal programmiert wurden. 

Dem Atari-Besitzer kann es aber 
eigentlich gleich sein, denn es wird 
keine der beiden Pascal-Versionen für 
die 8-Bit-Ataris angeboten. Scheidet 
damit der Atari als Lerninstrument und 
Pascal als Programmiersprache auf 
dem Atari aus? Mitnichten! 








Rechnung ohne den Wirt(h) gemacht, 
wenn man sich auf Angaben über 
Standard-Pascal verläßt. Nebenbei 
sind auch Funktionen zur Stringbe- 
handlung wie unter Turbo-Pascal 
implementiert. Was den Sprachum- 
fang angeht, ist der Compiler also auf 
dem neuesten Stand der Dinge. 


Komfortable 
Kommandos 


Wie gestaltet sich nun der Umgang 
mit Kyan-Pascal? Der Compiler wird 
zusammen mit einem Text-Editor und 
dem Kommandointerpreter »KIX« für 
Atari DOS 2.5 geliefert. Durch dieses 
gut abgestimmte System verläuft die 
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Seit fast zwei Jahren wird der schon 
auf dem Apple Il erfolgreiche »Kyan- 
Pascal«-Compiler auch für den 8-Bit- 
Atari mit mindestens 64 KByte ange- 
boten. Dabei handelt es sich nicht um 
eine abgemagerte Version des Apple- 
Originals, sondern um ein vollständi- 
ges und sehr leistungsfähiges 
System. Schon beim ersten Durch- 
blättern des englischen Handbuchs 
sieht der Pascal-Kenner, daß. Kyan- 
Pascal eine entscheidende Grundvor- 
aussetzung für die sinnvolle Anwen- 
dung eines Pascal-Compilers erfüllt: 
Es beherrscht den Pascal-Sprach- 
standard voll und ganz. Was nützt 
schon ein Spar-Compiler, bei dem 
gerade die interessantesten Funktio- 
nen, die das Flair von Pascal ausma- 
chen, fehlen? 

Der Compiler 


verarbeitet den 


gesamten Umfang von ISO-Pascal, 
das weitgehend der ursprünglichen 
Definition durch Jensen/Wirth ent- 
‚spricht. Hier hat man also nicht die 
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Arbeit mit Kyan-Pascal ähnlich wie 
unter den Betriebssystemen DOS XL, 
MS-DOS und UNIX. Viele Befehle von 
KIX sind den erwähnten Betriebs- 
systemen sogar entliehen. Eine Funk- 
tion verleiht dem Ganzen ganz beson- 
ders den Hauch eines Großrechners. 
Bei den meisten Kommandos kann 
das Ausgabegerät mit dem Größer- 
Zeichen » > « bestimmt werden. Zum 
Beispiel gibt »LS *.* >P« das Direc- 
tory auf dem Drucker aus. 


Eleganter Editor 


Wie bei allen Pascal-Systemen sind 
Compiler und Editor voneinander 
getrennte Programme, die erst über 
KIX geladen werden. Das Schreiben 
oder Verbessern eines Pascal- 
Programms beginnt also immer mit 
dem Laden des Bildschirmeditors 
»ED«. Beim Editieren stehen dem 


145 





Benutzer nicht nur Funktionen zum 
Löschen und Einfügen von Zeichen 
und Zeilen zur Verfügung. Auch 
Befehle zum Ausschneiden, Kopieren 
und Löschen von Textblöcken fehlen 
nicht. ED entpuppt sich beim Arbeiten 
als kleines, sehr komfortables Text- 
verarbeitungssystem. Durch seinen 
vollständigen Befehlssatz und die 
hohe Arbeitsgeschwindigkeit ist es 
bestens zur Eingabe von Pascal- 
Programmtexten geeignet. 


Inline-Assembler 


Ist das Programm fertig eingege- 
ben, verläßt man den Editor, um den 
Compiler zu starten. Das über 26 
KByte lange Programm wird von KIX 
aus aufgerufen, zum Beispiel durch 
»PC HALLO.P«. 

Durch die Trennung von Editor und 
Compiler gestaltet sich das Arbeiten 
öfter etwas kompliziert. Tritt nämlich 
ein Fehler auf, muß man wieder den 
Editor laden, um nach dem Fehler zu 
suchen, diesen verbessern und 
erneut mit dem Compilieren anfan- 
gen. Turbo-Pascal wurde übrigens 
auch dadurch bekannt, daß es Compi- 
ler und Editor gleichzeitig im Speicher 
hält. Bei langen Programmen, die fast 
immer kleine Bugs enthalten, dauert 
es daher manchmal etwas länger, bis 
man das Programm endlich testen 
kann. Das gehört zu den angespro- 
chenen Problemen für Pascal- 
Neulinge. Die Arbeit lohnt sich aber. 

Der Compiler wandelt das angege- 
bene Pascal-Programm direkt in einen 
Assembler-Quelltext um, der an- 
schließend automatisch vom dazuge- 
hörigen Makro-Assembler zum aus- 
führbaren Programm assembliert 
wird. 

Diese ungewöhnliche Lösung hat 
einige bestechende Vorteile gegen- 
über einer Direkt-Compilierung in 
Maschinensprache. Zum einen kann 
man dadurch ganze, vollständig in 
Assembler geschriebene Prozeduren 
einbinden. Zum anderen ist auch eine 
nachträgliche Optimierung des 
erzeugten Maschinencodes erlaubt. 
Zusätzlich kann man sogar genau wie 
bei Turbo-Pascal Assembler-Befehle 
‚direkt in das Pascal-Programm hinein- 
schreiben. Der Assembler versteht 
nicht nur gängige Pseudo-Opcodes, 
sondern verarbeitet auch einfache 
Makros. 

Besonders an dieser Funktion zeigt 
sich das durchdachte Konzept des 
Compilers. Er bietet nicht nur den 
Komfort von Pascal, sondern erlaubt 
auch sehr schnelle und variable Pro- 
gramme, die auch eingefleischte 
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Assembler-Freaks befriedigen. Es ist 
sogar möglich, schwer umzusetzende 
Programmteile in Pascal zu schrei- 
ben, um den Assembler-Teil in ein 
anderes Assembler-Programm zu 
übernehmen. Das bietet sich beson- 
ders bei aufwendigen Berechnungen 
an, die in Assembler nur sehr schwie- 
rig zu programmieren sind. 

Die fertigen Maschinensprach- 
Programme sind sehr kurz, da die 
Pascal-Laufzeitbibliothek, die die 
wichtigsten Standardprozeduren ent- 
hält und auch die Äbarbeitung des 
Programms überwacht, nicht mit ein- 
gebunden, sondern erst bei Bedarf 
von Diskette geladen wird. Dies hat 
den großen Vorteil, daß man auf der 
Diskette eine Menge compilierte Pro- 
gramme unterbringen kann. Wer das 
häufige Diskettenwechseln von ande- 
ren Compilern her kennt, weiß diese 
Tatsache zu schätzen. 

Bei den Diskettenzugriffen ist es 
den Entwicklern wiederum gelungen, 
das System sehr anwenderfreundlich 
zu machen. Alle Dateien werden von 
KIX zunächst auf der RAM-Disk 
(sofern vorhanden) gesucht. Das 
bedeutet, daß viele Teile nur ein einzi- 
ges Mal geladen und beim nächsten 
Zugriff direkt aus dem Speicher geholt 
werden. Durch diesen einfachen Trick 
fällt bei genügendem Speicheraus- 
bau die zusätzliche Ladezeit über- 
haupt nicht ins Gewicht. Mit einem 
Atari 130 XE hat man also von Anfang 
an ein sehr schnelles System. Erfahre- 
nen Programmierern wird es aller- 
dings auch nicht schwerfallen, die 
Standardbibliothek direkt in das fer- 
tige Programm zu übernehmen. 


Kurz und schnell 


Wie steht es nun mit der Geschwin- 
digkeit des ausführbaren Pro- 
gramms? In der Bedienungsanleitung 
wird versprochen, daß es in etwa die 
gleiche Geschwindigkeit wie ein unter 
Turbo-Pascal geschriebenes Pro- 


gramm auf einem mit 4 MHz laufen- 
den CP/M-Rechner erreicht. Somit ist 
es beispielsweise mehr als doppelt so 
schnell wie auf einem Commodore 
128 im CP/M-Modus. Dieses Verspre- 
chen wird nach unseren Tests auch 
gehalten. Das heißt in der Praxis, daß 
Kyan-Pascal neben der C-ähnlichen 
Sprache »ACTION!« die schnellste 
höhere Programmiersprache auf dem 
Atari ist. Sie ist zwar nicht so schnell 
wie reiner Assembler-Code, doch 
dafür wesentlich einfacher einzuge- 
ben und zu debuggen als Assembler. 

Nebenbei soll noch lobend erwähnt 
werden, daß Kyan in der jetzt vorlie- 
genden Version sämtliche Schwächen 
der ersten Ausführung beseitigt hat. 

Kyan-Pascal ist eines der Produkte, 
denen man ihre klare Konzeption sehr 
deutlich anmerkt. Es ist klar durch- 
dacht und sehr anwenderfreundlich. 
Man erhält für knapp 250 Mark ein 
Paket, das man auch zum Erlernen 
der Programmiersprache Pascal 
benutzen kann, da sämtliche gegebe- 
nen Standards erfüllt werden. Dazu 
trägt auch das ausgezeichnete Hand- 
buch bei, das 170 der knapp 250 Sei- 
ten einer ausführlichen Einführung in 
die Programmiersprache widmet. Das 
einzige Manko ist, daß die Dokumen- 
tation leider in Englisch geschrieben 
ist. Wenn man sich hier nicht ganz 
sicher fühlt, empfiehlt sich ein deut- 
sches Buch als Unterstützung zum 
Pascal-Lernen. 

Eine der Besonderheiten an Kyan- 
Pascal ist, daß der fortgeschrittene 
Programmierer auch die Komman- 
doumgebung KIX und den mitgeliefer- 
ten Assembler erhält. Dieses starke 
Paar unterstützt auch den Benutzer, 
der nicht nur Pascal programmieren 
möchte. Wer also nach einem relativ 
billigen Pascal-System sucht, ist mit 
einem Atari 130 XE und Kyan-Pascal 
bestens bedient. Es ist eine zukunfts- 
sichere Investition. 

(Julian Reschke/gn) 


Bezugsquelle: Compy Shop, Gneisenaustr. 29, 4330 Mühl- 
heim/Ruhr 


x-Kommandos | 


CHANGE DEVICE 

PRINT WORKING DEVICE 
LIST DIRECTORY 
CONCATENATE 

COPY 

MOVE 


REMOVE | 
CHANGE PROTECTION MODE 


SCREEN DUMP 
EDITOR 


PASCAL-COMPILER 
ASSEMBLER 








Standardgerät (z.B. »D2:«) einstellen 

Name des Standardgeräts ausgeben 
Directory ausgeben 

Dateiinhalt ausgeben 

Datei kopieren 

Datei bewegen (kopieren und Quelle löschen) 
Datei löschen 

Dateistatus ändern »LOCK«...) 
Diskette formatieren 
Bildschirminhalt ausdrucken 
Rückkehr in DOS 25 

Editor aufrufen 
Pascal-Compiler starten 
Assembler starten 











den Textverarbeitungen 


lange Zeit Textverarbeitungspro- 

gramme. Als Beispiele seien hier 
der »Atari Schreiber«, »Atari-Wordpro- 
cessor«, »Letter Perfect« oder »Atext« 
genannt. In die Reihe der Altmeister 
reiht sich der »Starlexter« aus der 
»Mister Micro«-Serie des Sybex-Ver- 
lages ein. Dieses Programm vereint 
flexible Textgestaltung mit einfacher 
Bedienung. Ein Programm, auf das 
viele gewartet haben. 

Nach dem Start von Starlexter öff- 
net sich erst einmal lautstark ein 
Schott auf dem Bildschirm und gibt 
den Blick auf das Textfeld frei. Diesen 
Scherz hat man von der C64-Version 
übernommen. Der rasante Beginn 


Re: Ataris 8-Bitter gibt es schon 


Ss.i5t 
erzuchstext .der- 
ren-Sinn-hat, -als-de 
exter- Dorrustatten: 


‚weiteren- Erklärungen 
el: im-Beitr29 .'zum- 


Einfache Bedienung und 
schnelle Verarbeitung sind die 
Hauptmerkmale des Pro- 


gramms »Starfexter«. Es ist eine 
der besten Textverarbeitungen 
für den Atari XL. 


Die aktuelle Cursorposition im Text 
wird in der unteren Bildschirmzeile 
angezeigt. Das Arbeitsblatt kann man 
nach Lust und Laune mit Text füllen, 
ohne daß der Benutzer auf Zeilen- 
länge oder Absätze achten muß. Eine 
deutsche Tastaturbelegung mit 
Umlauten ist selbstverständlich. Kor- 
rekturen sind durch UÜberschreiben, 


keinen- 
N 


Ist der Text komplett eingegeben, 
kann man sich mit dem Aussehen des 
Schriftstücks, der Formatierung, 
befassen. Durch Druck auf die 
<ESC>-Taste wird der sogenannte 
»Control«--Modus eingeschaltet. Mit 
den Funktionstasten <OPTION>, 
<SELECT> und <START> werden 
dann die Menüs aufgerufen. Die einfa- 
che und einprägsame Menüführung 
macht den Starlexter so anwender- 
freundlich, daß man keine große 
Erfahrung mit anderen Textverarbei- 
tungsprogrammen braucht, um 
schnell mit diesem Programm zurecht 
zu kommen. 

Durch die <START >-Taste gelangt 
man im Control-Modus in das 





5o präsentiert sich der Starfexter auf dem Bildschirm: Mit deutschen Umlauten und übersichtlichen Menüs 


kündigt aber schon an, was den Be- 
nutzer beim Arbeiten mit dem Starlex- 
ter erwartet: ein spielerisch leicht zu 
bedienendes Programm. 

Das Textfenster, in dem gearbeitet 
wird, umfaßt 21 Zeilen mit je 40 Zei- 
chen. Am oberen Bildschirmrand 
befindet sich eine Informationszeile, 
die auf einen Blick die wichtigsten 
Parameter anzeigt. Durch Scrolling 
bewegt sich das Textfenster auf der 
Arbeitsfläche recht komfortabel senk- 
recht und waagrecht. Der Text darf 
ohne weiteres breiter sein, als er auf 
einmal auf dem Bildschirm dargestellt 
wird. Beim Scrollen im Text ist der Star- 
Texter sehr schnell, so daß auch bei 
großen und umfangreichen Dokumen- 
ten keine merkliche Verzögerung ein- 
tritt. Das ist für alle wichtig, die viel mit 
dem Programm arbeiten wollen. 





Löschen oder Einfügen von Zeichen 
leicht durchführbar. 

Der Starlexter kennt zwei Schreib- 
modi. Entweder überschreibt er alle 
Zeichen, die sich eventuell in der Zeile 
befinden, oder er schiebt sie erst zur 
Seite, bevor der neue Buchstabe 
gesetzt wird. Die Umschaltung zwi- 
schen UÜberschreiben und Einfügen 
erfolgt bequem per Tastendruck. 

Auch Blockoperätionen bereiten 
diesem Programm keine Probleme. 
Ganze Textblöcke können kopiert, 
gelöscht oder verschoben werden. 
Hier bietet der Starlexter alle Stan- 
dardfunktionen, die das Schreiben 
angenehm machen. Beim Verfassen 
von langen Texten kommt es, daß man 
das Geschriebene umstrukturieren 
möchte. Mit diesem Programm ist das 
kein Problem. 





Formatierungs- und Druckausgabe- 
Menü. Hier wird der Text des Arbeits- 
blattes automatisch auf das 
gewünschte Format gebracht und 
dann ausgedruckt. Zur Formatierung 
dienen die mit dem ÖOPTION-Menü 
eingestellten Parameter für Zeilen- 
und Seitenlänge sowie für Einrückung 
von Absätzen. Die Formatierung kann 
sowohl vorher auf dem Bildschirm als 
auch direkt bei der Druckausgabe 
erfolgen. Die vorherige Formatierung 
hat natürlich den Vorteil, daß man sich 
schon am Monitor einen Eindruck vom 
Aussehen des Texts verschafft. 

Im Zusammenhang mit der Forma- 
tierung zeigt der Starlexter aber seine’ 
größte Schwäche. Normalerweise 
passen bis zu 20000 Zeichen in den 
Textspeicher. Diese Zahl ergibt sich 
aus der maximalen Textbreite von 80 
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Zeichen und der maximalen Zeilen- 
zahl von 250 Zeilen. Wenn man den 
Text aber auf dem Bildschirm forma- 
tiert, geht der Starlexter recht großzü- 
gig mit dem Speicherplatz um. Jede 
Zeile wird nämlich im Textspeicher 
und in einem externen Speichergerät 
mit einer Länge von 80 Zeichen 
berücksichtigt, auch wenn die Zeilen- 
länge zum Beispiel auf 60 reduziert 
wurde. Dieser ungenutzte Teil des 
Speicherplatzes steht aber nicht in 
Form von zusätzlichen Zeilen zur Ver- 
fügung. Der nicht genutzte Teil wird 
durch Leerzeichen aufgefüllt. Wenn 
der Text auf 60 Zeichen pro Zeile for- 
matiert ist, können nur 250 x 60 = 
15000 Zeichen statt der eigentlich 
nutzbaren 20000 Zeichen verwendet 
werden. Diese Platzverschwendung 
ist sehr störend, selbst wenn 250 Zei- 
len eine Menge Text sind. 


Platzverschwendung 


Die Programmautoren sind dabei 
wohl den für sie einfachsten Weg 
gegangen. Für den passionierten Viel- 
schreiber ist das aber sehr ärgerlich, 
daman nicht in allen Fällen mit der vol- 
len Zeilenbreite arbeiten will. Längere 
Texte muß man also zwangsläufig auf 
mehrere Dateien verteilen, wodurch 
das Finden des Anschlusses teilweise 
sehr schwierig ist. Wenn nämlich mit- 
ten im Satz der Textspeicher voll ist, 
muß man entweder die Folgedatei an 
exakt derselben Stelle fortsetzen oder 
den Text bis zum letzten Absatz 
löschen. Das scheint der Preis für die 
hohe Verarbeitungsgeschwindigkeit 
zu sein. Der einzige Weg, um den 
Speicher voll zu nutzen, ist, nur zum 
Drucken zu formatieren. 

Mitder <SELECT >-Taste ruft man 
das Disketten-Menü auf, daseine Viel- 
zahl von Diskettenoperationen wie 
Laden und Speichern von Texten, For- 
matieren von Disketten, Umbenennen 
von Dateien, Laden eines anderen 
Zeichensatzes und Anzeigen des 
Directory erlaubt. 

Im <OPTION>-Menü befinden 
sich umfangreiche Einstellungen für 
die Textdarstellung, wie das Setzen 
von Randbegrenzungen, Seiten- 
länge, Wortumbruch, Blocksatz, Zei- 
lenabstand, Zeilenlänge und Position 
der Kopf- und Fußzeile. Die farbliche 
Darstellungsart von Bildschirmrand, 
Cursorfarbe und Blockmarkierung 
läßt sich ebenfalls sehr vielfältig mani- 
pulieren. 

Bevor der Text gedruckt wird, kann 
man ihn sich durch Druck auf die 
HELP-Iaste in 80-Zeichen-Dar- 
stellung auf dem Bildschirm ansehen. 
Aufgrund der beschränkten Auflösung 
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der Atari-XL/XE-Computer ist die Les- 
barkeit natürlich nicht besonders 
hoch, aber um sich einen Überblick 
über das Aussehen des Schriftstückes 
zu verschaffen, reicht sie allemal aus. 
Sinn macht diese Funktion natürlich 
nur, wenn man den Text auch im Spei- 
cher formatiert. Wählt man aus Platz- 
gründen nur die Druckformatierung, 
nutzt diese sonst sehr nützliche 
Funktion gar nichts. 

Bevor man mit Starlexter etwas zu 
Papier bringen will, sollte man auf 
jeden Fall das Installationsprogramm 
»Install.Bas« starten. Sofern man nicht 
einen voreingestellten Atari-Drucker 
1025 oder 1029 oder einen Epson- 
kompatiblen Drucker verwendet, kann 
man mit dem Installationsprogramm 
seinen Drucker individuell an den 
Starlexter anpassen. Während bei 
anderen Programmen oft Probleme 
mit dem Druckeranschluß auftreten, 
haben sich die Autoren des Starlex- 
ters bei diesem Punkt sehr viel Mühe 
gegeben. So kann man zum Beispiel 
einen Drucker mit Centronics- 
schnittstelle über die Joystickports 
anschließen, wenn kein Centronics- 
Interface zur Verfügung steht! 
Dadurch kommt der Benutzer auch in 
den Genuß eines Centronics- 
Interfaces, wie es zum Änsteuern der 
meisten Drucker nötig ist. 

Als kleines »Bonbon« gibt es noch 
die Funktion, in der Textverarbeitung 
zu rechnen! Die Programmierer nut- 
zen hierbei den eingebauten Basic- 
Interpreter aus. Die zu berechnenden 
Ausdrücke werden dem Basic-Inter- 
preter als Basic-Zeile »verkauft«, die 
dann berechnet und an Starfexter aus- 
gegeben werden. Diese Funktion 
lohnt sich besonders für denjenigen, 
der mit seinem Computer Rechnun- 
gen schreiben will. Der zusätzliche 
Taschenrechner hat beim Starlexter 
ausgedient. Aber auch für Referate in 
Mathematik oder Physik kann man die 
Rechenfunktion gut gebrauchen. 

Als deutsches Produkt hat der Star- 
Texter wie erwähnt schon von vorn 
herein einen deutschen Zeichensatz 
und die deutsche Tastaturbelegung. 
Nur gibt es fast immer einen Anlaß, ein 
bestimmtes Zeichen drucken zu wol- 
len, das nicht im Zeichensatz enthal- 
ten ist. Besonders bei fremdsprachi- 
gen Texten tritt dieses Problem häufig 
auf. Der Starlexter weiß hier Abhilfe. 

Mit dem ebenfalls auf der Diskette 
enthaltenen Basic-Programm »Star- 
Font« entwirft man eigene Zeichen- 
sätze für den Starlexter. Drei fertige 
Zeichensätze werden übrigens gleich 
mitgeliefert. Wenn man es wünscht, 
werden die neuen Zeichen auf dem 
Bildschirm dargestellt. Ein Ausdruck 
von Texten mit verschiedenen Zei- 





chensätzen ist natürlich ebenfalls 
möglich. Das mühsam gezeichnete 
Telefon-Symbol oder die griechischen 
Buchstaben erscheinen beim Starlex- 
ter also garantiert auch auf dem 
Drucker und nicht wie bei anderen 
Programmen nur auf dem Bildschirm. 

Eine Funktion vermißt man bei Star- 
Texter leider. Er beherrscht keine 
Serienbriefe, so daß er zum Beispiel 
für die Vereinsverwaltung nur bedingt 
geeignet ist. Man muß bei jedem Brief 
die Adresse, den Namen und die 
Anrede von Hand ändern. Bei drei 
identischen Briefen stört das noch 
nicht, aber bei zehn oder mehr geht 
diese Funktion sehr ab. Hier zeigt sich 
der Nachteil, daß Sybex im Gegensatz 
zur C64-Version keine passende 
Dateiverwaltung zum Starlexter an- 
bietet, Wer allerdings selten den glei- 
chen Brief an viele Leute verschicken 
möchte, wird die Serienbrief-Funktion 
kaum vermissen. 

Ein großes Lob gebührt dem Pro- 
gramm wegen der Dokumentation. 
Das Handbuch ist ausführlich und ver- 
ständlich geschrieben. Es hilft dem 
Einsteiger, sich schnell auf dem Star- 
Texter einzuarbeiten, so daß die ersten 
Texte nicht lange auf sich warten las- 
sen. Kleine Beispiele im Handbuch 
dienen jeweils zur Verdeutlichung der 
erklärten Funktion. 


Gutes Handbuch 


Die Anleitung hilft aber nicht nur 
dem Neuling. Im Anhang befindet sich 
eine Übersicht aller Funktionen mit 
einer Kurzerklärung. Die Referenz- 
karte hat sich beim täglichen Einsatz 
bewährt, da man nicht erst im Hand- 
buch nachschlagen muß. Auch wer 
viel mit einem Programm arbeitet, 
kennt nur die wichtigsten Standard- 
Befehle auswendig. Die sonstigen 
Fähigkeiten des Programms bezie- 
hungsweise wie man eine Zusatzfunk- 
tion korrekt aufruft, vergißt man 
schnell. Außerdem findet man sich 
auch schnell wieder zurecht, wenn 
längere Zeit nicht mit dem Programm 
gearbeitet wurde. 

Im großen und ganzen erhält man 
für den Preis von 64 Mark ein lei- 
stungsfähiges Programm, das für die 
meisten Heimanwendungen vollauf 
ausreicht. Die Bedienung ist durch 
das ausführliche Handbuch und dank 
der ausgefeilten Menütechnik einfach 
und schnell zu erlernen. Der Starlex- 
ter ist voll und ganz auf den Heimbe- 
reich zugeschnitten und empfiehlt 
sich jedem, der eine unkomplizierte 
Textverarbeitung sucht. 

(H.D. Jankowski/Julian Reschke/gn) 








Atarı verbindlich: 


XL-ST-Interface 


Besitzen Sie neben dem Atari 
AL auch seinen großen Bruder, 
einen Atari ST, und möchten 
Programme und Dateien über- 
tragen? Hier ist die Lösung: ein 
XL-ST-Interface! 


er Aufwand für ein Interface 
D zwischen den beiden Compu- 

tern ist verhältnismäßig ge- 
ring. Sie benötigen einen XL, einen ST 
(oder einen 400er/800er), eine kleine 
Schaltung und ein Programm im ST, 
welches alles verwaltet. Sie erhalten 
dann einen aufgerüsteten XL mit zwei 
Diskettenlaufwerken und Drucker, die 
vom ST emuliert werden. Gleichzeitig 
können Sie beliebige Dateien oder 
auch den Inhalt ganzer Disketten vom 
XL zum ST und umgekehrt übertra- 
gen. Durch Anderung des Program- 
mes kann der ST den XL steuern und 
als Peripheriegerät benutzen. 


Die Hardware 


Die Schaltung wird zur Pegelwand- 
lung zwischen der RS232-Schnitt- 
stelle und dem XL-Systembus benö- 
tigt, da der ST mit 12 Volt und der XL- 
Bus mit TTL-Pegel (also 5 Volt) arbei- 
tet. Es gibt hierfür einige Schaltungs- 
varianten. Da keine geeignete Span- 
nungsversorgung bei den Computern 
vorhanden ist, haben wir eine Schal- 
tung gewählt, die aus den am XL-Bus 
anliegenden 5 Volt selbständig die 12 
Volt für den ST herstellt. Das Kern- 
stück dieser Schaltung ist ein IC mit 
der Bezeichnung MAX232. Auf Seite 
150 sehen Sie den recht einfachen 
Schaltplan. Das Bild rechts zeigt die 
fertig auf Lochrasterplatte aufgebaute 
Schaltung. Außer dem MAX232 be- 
nötigen Sie noch vier Elektrolyt- 
Kondensatoren. Beim Zusammenbau 
müssen Sie unbedingt auf die richtige 
Polung der Kondensatoren achten. 


_ Die Software 


Obwohl das Programm in GFA- 
Basic geschrieben ist, arbeitet es 
schneller als die wirklichen Disketten- 
laufwerke des XL. Lediglich für die 
Routine zur Prüfsummenbildung wird 
ein Maschinenprogramm eingesetzt, 








das jedoch aus nur 24 Byte besteht. 
Außerdem läuft das gesamte Pro- 
gramm vollständig unter GEM, 
wodurch die Bedienung sehr einfach 
wird. 

Nach dem Starten des Programmes 
erhält man außer der Menüleiste vier 
Fenster, je eines für die zwei virtuellen 
Diskettenlaufwerke, eines für den 
Drucker und ein Statusienster. Die 
Laufwerke sind wahlweise ausschalt- 
bar und haben dann keinerlei Einfluß 
auf die Busfunktionen des XL. Somit 
kann man zum Beispiel ein 1050-Lauf- 
werk problemlos mitbenutzen, wobei 


Auf einer kleinen 
Lochrasterplatine 
findet das Interface 
spielend Platz, 
man braucht nicht | 
einmal einLöt- FI 7 zZ 
künstler zu sein ZZ 


Sie durch Ausschalten des echten und 
Einschalten des virtuellen Laufwerks 
hin- und herschalten. 

Die virtuellen Laufwerke arbeiten 
zunächst einmal genauso wie die ech- 
ten. Zusätzlich haben Sie die Wahl, 
die Floppies von 128 auf 256 Byte pro 
Sektor umzuschalten, wodurch sich 
die Diskettenkapazität verdoppelt. Ein 
käufliches Laufwerk mit 256 Byte pro 
Sektor hat es zwar hierzulande nie 
gegeben, das DOS II des XL unter- 
stützt jedoch ein solches Gerät. 

Sie können nun beliebige Dateien 
von XL- auf ST-Format und umgekehrt 
übertragen, wodurch zum Beispiel 
alte Texte oder Adreßdaten im XL für 








den ST verfügbar werden. Auch ganze 
Disketteninhalte können im ST oder 
auf 3’2-Zoll-Diskette gespeichert und 
schnell wieder geladen werden, was 
sich für System- oder Compilerdisket- 
ten anbietet, da man natürlich den XL 
auch vom ST aus booten kann. 

Das Menü des Programmes bietet 
folgende Auswahlpunkte: 

Der erste Menüpunkt »Desk« ent- 
halt: 
Atari 800 Interface gibt eine Pro- 
gramminformation aus. 

Außerdem stehen die sechs Ac- 
cessories zur Verfügung. 





Die folgenden zwei Menüs »Disk 1« 
und »Disk 2« beinhalten die Auswahl- 
punkte: 

Directory zeigt das aktuelle Inhalts- 
verzeichnis und den verbliebenen 
Speicherplatz an 

Save Disk speichert den Disketten- 
inhalt auf ST-Diskette (nur die beleg- 
ten Sektoren) 

Load Disk lädt eine mit »Save Disk« 
gespeicherte Diskette 

Format SD formatiert die Diskette im 
Single-Density-Format (DOS II) 
Format DD formatiert im Double- 
Density-Format (DOS Ill) 

Set Aktivierung/Desaktivierung der 
Diskette 
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Be XL 


Data in I; 


Data out 5 


| 

| 

Ve ar 
| | 


+5 Volt ! 10 


| 
| 


Masse 4 


Das Herz der Schaltung: IC MAX232 


Im Menü »Settings« sind folgende 
Punkte enthalten: 
128 BpS Auswahl von 128 Byte pro 
Sektor Diskettenformat 
256 BpS Auswahl von 256 Byte pro 
Sektor 
show Sector# Ein-/Ausschalten der 
ständigen Anzeige der Nummer des 
momentan bearbeiteten Sektors 
Clearw Disk 1, Clearw Disk 2, Clearw 
Status löschen das angegebene Fen- 
sier 
Unter dem Menüpunkt »Ende« steht 
Quit, womit man das Programm been- 
det. 

Das Programm beginnt mit einigen 
Initialisierungen: Menü lesen und 


* ##* ATARI ST-ATARIT B00- 
Interface 1/87 
S.A.Dittrich ### 

Cls 

: Deffn Cl=(S2ec#-25) 7/8 

: Deffn Sec=9#C1%+25 

= Deftext 1,0,0,% 

: Dim Com% (5} „Me$ (505 „D#(1,1050) 
„DF%11},D%{1l) ,Su&(1,1050) 
Open ""„#1,"AUä:" 
Mull$s=String®S(128,0) 
Ffs=-String® (256,255) 

: Len&=178 

: JImitail 

: Restore 
For I%=0 To 40 

Read Meti{Iä) 
Exit If Mes(IH)="##." 

z Next I% 


 MestI4)="" 
Mesi In+i)="" 
Data Desk „ ATARI 800 
Inter tar ee 
„1,2,3,4,9,5,"" 


= Data Disk I „ Directory, 
Save Disk, Load Disk, 
Format SD, Format DD,--- 
Set,„"" 
= Data Disk 2, Direriory, 
Save Disk, Load Disk, 
Format 5D, Format DD,-—— 
Set a 177 
: Data Settings „ 128 BoS, 
2556 EpS5, show Sector# „= 





anzeigen, Fenster benennen und Öff- 
nen, Schnittstelle auf 19200 Baud ein- 
stellen, womit der serielle Bus des XL 
läuft, und den RS232-Puffer leeren. 


Programm nach 


Wunsch erweitern 


Danach wartet das Programm in 
einer Schleife auf den Empfang eines 
seriellen Byte oder auf die Wahl eines 
Menüpunktes. Ist ein Byte angekom- 
men, testet eine Routine, ob es den 
Drucker oder eine aktivierte Disketten- 
station anspricht. Wenn nicht, so wird 


Clearw 


Data Cleares Disk 1, 
Disk Z, Clearw Status, 

: Data Ende, * Buit = „###+ 

: Menu Meri) 

: Closeuw 1 

: Titleu i,"bisk 1” 

Intow 1,"-" 
Closen Z 

: Titlew 2,"Drucker nicht 
implementiert" 

Infow 2,"Yollständige Version 
auf Leserserwice-Disk!" 

: Closew 3 

=: Titlen 3," 

= Intow 3,04 
Closew 4 
Titlew 4, "Status" 

For I&=1:i To # 
Opbenw I# 
Cls 

: Next I% 

ı On Fenu Gosub Menue 
Da=%b105115,0,0,-1,-1,71,713 
Dati)=i 

: ESn%=0 

: Menu 265,1 

: Fa=1 
Gh%=i 
Menu 47,1 

: aDinfos 

: „Setmp 

EI Gl: 

Shomm 
While Biosti,i)e-1 


| Das brauchen Sie für diese 

Schaltung: 

IC: MAX232 
Kondensatoren: 2x 224uF 
2xX25u - 
25pol D-Sub 
(weiblich) 
XL-System- 
bus-Stecker 

Können Sie keinen Systembus- 

Stecker auftreiben, benutzen Sie 

einzelne Steckschuhe, die auf 

diese Stifte passen. Sie sind in 
' jedem Elektronik-Laden erhältlich. 

Natürlich können Sie das Verbin- 
| dungskabel auch im Atari XL von 

innen an den Systemport anlöten. 

Zum Schluß benötigen Sie noch | 
ein Stück Kabel, mindestens vier- 
adrig, und ein kleines Stück 
| Lochraster-Platine. 


Stecker: 





es ignoriert, andernfalls liest das Pro- 
gramm den Rest des zu erwartenden 
Kommandoblocks und führt die gefor- 
derte Funktion aus. Bei eventuellen 
Prüfsummenfehlern wird eine ent- 
sprechende Fehlermeldung im Sta- 
tusfenster ausgegeben, wobei die 
erste ausgegebene Zahl die selbst- 
errechnete und die zweite Zahl die 
empfangene Prüfsumme darstellt. 
Um Platz zu sparen, haben wir auf 
die Drucker-, Kopier- und Directory- 
Routinen verzichtet. Dennoch ist 
diese Version lauffähig, so daß Sie das 
Programm nach Ihren eigenen Wün- 
schen erweitern können. 
(Stefan Dittrich/kl) 


Es=Inp il) 
On Menu 
: Wend 
Go: 
Showm 
: While Bios(1,1})<>-1 
: On Menu 
: Mend 
: Hidem 
E Gar: 
: E&=Inp tl) 
If SCR<häa4 Or PRr=ör Arnd 
IC<FAsct"1"} Or DEIO)I=G) 
And (03% >Ascit"2") Or 
D#&{1}=0) 
Goto Go 
: Endif 
Sh=-CH 
:s For I2=1 To 3 
E#=Inp(i) 
Com% 1(I#s}=E# 
S54=5%+B% 
Sı%=1i5% And 255% +1Int (5%7256&) 
:ı Nest Is 
: B&3=Inp (1) 
If BSi>51I% 
OJpenw 4 
Frint " Imvalid Command- 
Frame +" 
Goto Goil 
= EnditF 
.: I ChsAsct"1") Or Casäsct"2") 
' *# Disk-Routinen * 
DE=C%-Asct{"00i-1 









—— Zn - 
— z I Be 


Sr VfN m 
a Dut 1,Asc("A") 
BS: Sec#=-Com& {?)+Com#% (3)#255 
B&: If Com» t1}=Asct"R") 
87: # Read Sektor * 
88: Dut 1,Asct"A"} 
Bo: if Sn# 
ao: Übenw DE#2+1 
OL: Frint Ati1,1):"Sending 
Secetör $";Hex#iSecä)h;," 4" 
Sera") “ 
FE: Endif 
737 Frint #1,D# (0% Sec#)+ 
Chr $15u%# (D4 ,Sec#) I+"C" 
24: Goto Go 
Sue Endif 
Fa: If Com% ti)=eAsc("P") Or 
Con&{1l}=Asct"W") 
FT #* Fut‘* Write Sektor *# 
ar Out 1,Asct"A") 
E If Secki4 
1003 "DsıB#% „Sec#}=Input#(128, 
#1} 
int: Else 
102: DE (D% ,Sec#)= Input=tLen%, 
#1) 
103: Endif 
104: E%=1np{1) 
Io: Out 1,Asct"A") 
LS: If 50% 
Icrr: Übenw De#s2+l 
198: Frint Attl,1ı3 "Getting 
Sector $"1 Hex #15ec#);" 4" 
 Secä;") . 
i0?7: Endif 
pa RU wbosumtSech!} 
De- If SIitc>B% 
EI Openw 4 
112% Frint " FUT: Cherk&sum- 
error in #";Hex#tiseckh tr" 
ee Hart 
Hexs iE%) 
114: Out 1,Aerc"E") 
115: Goto Go1 
11#: Endıt 
117: Dut 1,ÄAsct"C") 
ı1E: Goto Goa 
un Endit 
120% If Com% 11} =Ascı"S") 
121: :# Disk-5tatus # 
Tas Openw DE#2+l 
123: if Len%=17H 
124: khestore Dstati 
175% Else 
12%: Restore Dstatz 
127: Endi+r 
136: For: I&=1 To:& 
1275 Read E% 
130: Dut 1,B% 
1512 hext I# 
132% Goto Ga 
1.93: Dstatl: 
134: Data: 67, 16,0,1,9,17 
ee Ostat2: 
138: Data 57,48,0,1,0,47 
137: Endi* 
138: I# DomnsiJeäser"ıu) 'Or 
Com» i(l)= a4 
I ‘#* Format Disk SD oder 
DE = 
140: Dut 1,Asci"A") 
i4l: D+2 (DE) =Com% (13-32 
142: abinfo 
143: Print '" Formatierung.." 
144: WInit 
145: Frint #1,String#$tiLen#*+l, 
re) 
1465: Out I1,Asct"Cc") 
147: Goto Go 
148: Endif 
149: Üpenw 4 
150: Print "Unknown Command =: "; 
Hez#(Comail}h'"t"; 
Chr#(iComa ti)’: "}" 
151: Goto Gol 
152= Endif 
19.7, Goto 560 
in# ° # Prozeduren *#* 
155: Frocedures Menue 
156: D&s=1+tMenutöor< 17 
Ey On Menutio) Gosub Info 
158: On Menu (0)-10 Gosub Dir,Sav, 
L.oa,Fntsd,Fmtdd,X, Setd 
197: Un Menutü}-19 Gosub Dir,Sav, 
Loa,Ffmtsd,Fmtdd,X, Setd 
140: On Menui6)-28 Gosub Set1?28, 
Set 254 ,5hounr „A,C1lw,EIm, 
Elw,Clw 
161: Menu Off 
162: If Menu io)=238 





195: 
187: 
10: 
irt: 
ir2- 
1 rt 
174: 
iF3: 
1752 
Er 
178: 
199; 
SEHE 
21: 
are 
zus: 
ZCHH : 
Pa Le 
zu: 
zur: 
zo: 
UF: 
210: 
a De Bi 
212: 
Br 
214: 
le 


218: 
rg 
rn 6 
Zi: 
ZEch: 
re 
a 
z24: 
ee 
Be 
ae 
228: 
Be 
Pe 
urle 
ne 
233: 
pr 
ee 
ee 
at 


a = 
239: 
240: 
=41: 
a4: 
245; 
244: 
245: 
Bu Fe 
ra ar 
2a: 
re 
Ast: 
=S1: 


Showm 

Menu Kill 
Deftext 1,0,0,13 
Stop 

Menu Me#&t) 
Deftext 1,0,0,4 


On Menu Gosub Menue 

Enaif 
Return 
Frocedurs Info 

Alert Q,"” STARI Bad 
Interface 1/87 
5.Dittrich EM 
Dummy 
Return 


Frocedure Clw 

Operw Menuto)-31 

ls 
Return 
Frocedure Setmp 

Restore Mprog 

Hz 

For I#=1 To 2 

Read A# . 
M&=ME+Chr&iWali"SH"'+Ääs)) 

Next I# 

Mprog: 

Data 23,68 ,00,04,42,85,32, 
45,33,27,00,08,42,50,12, 
i1d,d1,01,51,cd,ff,fa,4se, 

13 
Return 
’#+ Diskrfrozeduren * 
Frocedure Set128 
If Lenk=e256 
Sure 
If Surei=2 
HullssString$(i1298,0) 
Menu Z8,1 
Menu 27,0 
Len%=128 
alnmitall 
Enditf 

Endif 
Return 
Frocedure Set25ö 

IF Ler%=128 

gSure 

If Sure*%=2 
Null$s=Strings$ (236,0) 
Menu 28,0 
Menu 27,1 
Len#=2I5 
WInitall 

Endif 

Endif 
Return 
Frocedure Sure 

Alert 1," Größenveränderung 
löscht. alle Daten !'! 
ee en = lu = BEE ea Surei 

If Sure#t=2 

Arrayfıll 
„Dintfos 

Endif 
Return 
Frocedure Shownr 

If 5n% 

Enk=ü 

Else 

Sn#=1 

Endif 

Menu 47,5n% 
Return 


f 


Df%(),0 


Frocedure Dosum (0%) 
If 0%:4 
L#=128 
Else 
L&3=Len® 
Endif 
M%=Warptr (M&$) 
51%=C: M% iL:Varptr (D$(D%,,0%)) 
„LM 
5u% 104, 0%) =51% 
Return 
Frocedure Dir 
‘ * Directory anzeigen 
* = ist nicht implementiert 
Return 
FProcedure Initall 
For D4=0 To 1 
alnit 
Next D% 
Return 
Frocedure Init 
For J#=-i To 73 
D# (D% ,J#)=String# (128,0) 





en | = = 

22; Su% (DL „IN =O | 

Fe Next J# 

Be For J%=4 To 1050 

Re D#1D% .J#)=5tring® (Len#,„0) 

ee Sus(D4,JR)=0 

ee Next JS 

Pe = j- Openw Datz+1 

ee Els 

z&0s: Return 

zöi1: Frocedure Saw 

- If Df#%(D#%) 

265: arile 

264: If Fi" 

263: Defmouse 2 

zo: For I[%=1050 Downto 1 

br: Exit If DEiD#,I#) 

<>String®$iLen#%, 0) 

268: Next I% 

2er: Öpen "RR", #2,F+,Len®+1 

270: Field #2,Len# As At,l 
As Sus 

le Al$=5tr$(1%)+"D"+ 
Str$(iDfs (DA) Ir" L"-+ 
Strs{iLen#&)} 

a | Suse" " 

ers; Lset At=Alt 

Zra: Fut #2,1 

See For Js=1 To Is 

Zrä: Lset As-D3 (0% ,J%} 

#77: Ssut=-eCchr# (5u% (DE, JA} 

ra Fut #2,J%+1 

Bea a Next JI% 

280: Close #2 

=B1: Defmouse DO 

2823 Endif 

283: Endif 

284: Return 

2895: Procedure Loa 

ZB: W=1 

2B7} If Dr&i(DE) 

288: Alert 1," Laden löscht 
den i alten Inhalt:",1, 
"Dr # Cancel ", IM 

zug: Endif 

ro: If Wei 

Fl: drile 

ae Ir F$S>"" 

Mn Defmouse 2 

Zy4: alnit 

Rei Open "I",#2,F# 

298: A$t=Input$11297,#2) 

art Is=Val (AS) 

zu8: D+%iD#%) =Val (Mid&$ (iA$, 
Instr {A#, "D"})+1,433 

Te If Len%=Wal (Mid${A$, 

| Inetr {At,"L"}+1,4))} 

Sol If Lenk=75#& 

Sol: A$=Input#(128,#2) 

ao2s Endif 

SOS: For Sec#=1 To I% 

oz DE (DE ,Seck)= 
Input# (Len#, #2) 

Su: Su 1(D% ,Sec#h)ı= 
Asc(Input£i1,#2)) 

Su: Next Sec# 

Sur: For Sec#=l To 3 

308: D$(D%,Sec%)= 
Left$ (DE (0%, ,Sec#} „1283 

u Bd Next Secä 

3108 Else 

31 Alert 1," Falsche 
Sektor-Länge: :",1," Stop 

"„Dummy'% 

an Endif 

Se Close #2 

=i14: wDinfo 

en Enditf 

„16% Defmouse 0 

Salr: Dir 

318: Endif 

=19: Return 

220: Frocedure File 

Set Fileselect "i#r-dek","", FE 

ee If Instr iFs,"., )e0 And F&I:" 

Ma Fs=Ft+-" dsk" 

In jr 7 Endif 

323: Return 

Sz&: Frocedure Setd 

ee WI=SZ#DK#+L 

328: Öpenw Wi 

er If D4(D%) 

IHR DRiDR)=O 


Verwaltungsprogramm im GFA- 
Basic für das XL-ST-Interface 
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Menu L7+F+D%,0 
Infow ki." Inaktıvw" 
Else 
D=tDe)=1 
Menu 17+9+D4,1 
SDinto 
Endif 
ı Return 
: Frocedure Fmtsd 
„Fmtsure 
If Sureä=1 
MidttiD$s(D% Fan! ,i 
Chr ${2) +Chr$t&Hl3r+ 
Chr-&i(Fı=lhrs (HH) -+ 
hr 12) 
Mid$ıD#iD%, 350) ,11,1)= 
Chr&115) 
MidsiDEIDR 340) ,12,80) = 
Strıng#(i89 ,2535 
Mıd$ (DE 1D4,I80) ,„I6,2)>= 
Chr #10) +Chr 8i&H7F) 
Su (DR, Jal)=2s 
DraıDa)=l 
abinto 


Er = 


Sehr: 


u - 
Ssfr 
Aa: 
347: Endif 

ag: Return 

351: Frocedure Fıatdd 
Mn afmtsure 


Fur Bastler: Cursor-Tasten 


If Surek=1 , 
Mid#t(D# (0%, 16), 15,27 = 
Chr (&HTE} +Chr$ {&HAS} 
SuU#iD%,14)=35 
For I&=1 To 128 
Mids$(DE(D4,24,I®@}= 
Chr #(%HFE) 

Nert. IE 

Su%&1iD# ,24)=127 

IFA DR)=2 

sDianto 

Endi* 

: Return 

: FPFrocedure Fatsure 
D’%=1+(MenutG}<197) 
Suret®l 
If DF% (DE) 

Alert 1," Formatieren 
löscht alles '! ıi",1," OK 
is Stachel "Sure 

Endif 
If Surs®=1 
JIlnıt 
Endif 
: Return 
- Frocedure Dinfo?z 
For DX=0 To 1 
Jbintfo 





"Be Return 
"7: Frocedure Dinfo 
IF DeiDba)=o 
Intow Darz+1," 
Else 
If Drai br =0 
Intow Z#D%+1L," 
unformatiert" 
Else 
If Df%#tDa)=i 
Intow D%#2+1," Aktiv =: 
Single density" 
Else 
Intow D%#2+1," Aktiv : 
Double Density" 
Endif 
Endif 
Endi+# 
3: Return 


Inaktiw" 


Aktiv : 


Verwaltungsprogramm für das 
XL-ST-Interface (Schluß) 





selbst gemacht 


Bei den XL-Geräten sind von 
Atari vier Funktionstasten vor- 
gesehen, die in den Computer 
nicht eingebaut wurden. Sie 
könnten jedoch im XL nützliche 
Funktionen übernehmen. War- 
um die Tasten also nicht selbst 
einbauen? 


em aufmerksamen XL-Anwen- 
DD der ist sicher aufgefallen, daß 

beim Tastaturtest im Selbst- 
testprogramm des XL vier Tasten nicht 
angesprochen werden können. Diese 
vier befinden sich auf dem Bildschirm 
zusammen mit den Funktionstasten 
rechts über der Abbildung der norma- 
len Tastatur. Sie sind mit <1>,<2>, 
<3> und <4> gekennzeichnet. 
Diese vier zusätzlichen Funktions- 
tasten waren beim 1200XL, 1400XL 
und beim 1450XLD eingebaut, die in 
Deutschland nie zur Auslieferung 
gelangten. In den erhältlichen XL- 
Baureihen fehlen sie, obwohl das 
Betriebssystem sie unterstützt. Durch 
den Einbau dieser vier Tasten erhält 
man separate Cursor-Tasten. Im ein- 
zelnen haben diese vier Tasten fol- 
gende Funktionen: 





<1> Cursor nach oben, entspricht 
<CONTROL> und <-> 

<2> Cursornach unten, entspricht 
<CONTROL> und <=> 
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<3> Cursor nach links, entspricht 
<CONTROL> und <+> 

<4> Cursor nach rechts, ent- 
spricht <CONTROL> und <*> 

Zusammen mit <SHIFT >: 

<1> Home (linke obere Ecke) 

<2> linke untere Ecke 

<3> Cursor an den linken Rand 

<4> Cursor an den rechten Rand 

Mit <CONTROL>: 


<1> Tastatur abschalten, nochma- 
liges Drücken wieder anschalten. 

<2> Bildschirm ausschalten (POKE 
559,0). Beliebiger Tastendruck stellt 
wieder auf vorherigen Wert. 

<4> Wechselt zwischen den bei- 
den Zeichensätzen. 

Warum sollte man sich diese nütz- 
lichen Funktionen entgehen lassen? 
Selbst einbauen heißt die Devise. 
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Abschirmblech 





Bild 1. Anschluß der Tasten an die Grundplatine 








Bevor Sie sich jedoch Lötkolben 
schwingend an ihrem Computer zu 
schaffen machen, sollten Sie beden- 
ken,. daß ein derartiger Eingriff den 
Verlust einer eventuell noch existie- 
renden Garantie zur Folge hat. 
Solange man das Original-Betriebs- 
system des XL benutzt, hat man nur 
Vorteile. Andere Betriebssysteme, wie 
zum Beispiel das des alten 800ers 
(das mit dem Atari-Translator geladen 
wird), fragen diese Tasten nicht ab, 
womit diese ohne Funktion bleiben. 

Doch nun frisch ans Werk, 
Kreuzschlitz-Schraubenzieher, Hand- 
bohrer oder ähnliches, Lötkolben, Löt- 
zinn, vier Tasten und ein paar Zentime- 
ter Litze bereitlegen. Wegen ihrer 
niedrigen Bauhöhe empfehlen sich 
Digi-Taster. Die Kosten hierfür be- 
tragen ungefähr vier Mark. 

Um ein Zerkratzen des XL zu verhin- 
dern, ist es ratsam, sich eine weiche 
Unterlage zu beschaffen. Legen Sie 
nun den Computer mit der Unterseite 
nach oben auf die Unterlage, lösen Sie 
die sechs Schrauben und verwahren 
Sie diese gut. Dann drehen Sie den 
Computer vorsichtig um, so daß die 
Tastatur zu Ihnen zeigt, und klappen 
das Oberteil nach rechts. Achten Sie 
aber darauf, daß Sie die Folie mit den 
aufgedruckten Leiterbahnen zwi- 
schen Rechnerplatine und Tastatur 
nicht beschädigen. Nun ziehen Sie 
gleichmäßig und ganz ganz vorsichtig 
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die Folie aus der Verbindungsleiste 
auf der Computerplatine. Jetzt ent- 
scheidet sich, ob der Einbau einfach 
oder umfangreich wird. Sehen Sie bei 
ihrem Computer unter der Tastatur 
eine Metallplatte, ist die Aufrüstaktion 
mit etwas mehr Arbeit verbunden (Bild 
1). Ist die Tastaturplatine zu sehen, 
gestaltet sich der Einbau einfacher 
(Bild 2). 


Neben dem Schacht 


ist Platz 


Zuerst werden die Tasten in den 
Computer eingebaut. Es empfiehlt 
sich, sie auf der weißen Oberseite 
links oder rechts neben dem Modul- 
schacht unterzubringen. Bohren Sie 
dann die Löcher für die Kontakte der 
Tasten und kleben Sie die Tasten auf. 
Dann verlöten Sie sie nach Bild 3. Ach- 
ten Sie darauf, den mit eins bis vier 
markierten Litzen eine ausreichende 
Länge zu geben, da diese mit der 
Tastatur beziehungsweise mit der 
Computerplatine verlötet werden. Die- 
jenigen, bei denen unter die Tastatur 
eine Metallplatte geschraubt ist, 
haben noch weitere Arbeit vorsich, die 
anderen können den folgenden 
Absatz überspringen. 

Zuerst müssen Sie zwei weitere 
Schrauben lösen. Dieeinesitztschräg 
links vor der Buchse, an die die Peri- 
pheriegeräte wie zum Beispiel Disket- 
tenstationen des XL-Computers ange- 
schlossen werden. Die andere befin- 
detsich schrägrechts vor dem Stecker 
der Stromversorgung. Greifen Sie nun 
unter die Platine, drücken Sie auf den 
Einschaltknopf und schieben Sie so 
die Platine leicht aus der Verankerung. 
Durch eine Drehung nach rechts 


TastenNr MI 


H - 





Kabel-Nr. 





unten, wobei Sie einen leichten Druck 
auf die Diskettenbuchse ausüben, 
springt die Platine heraus. Jetzt dre- 
hen Sie dıe Platine um und lösen alle 
noch verbliebenen Schrauben des 
Abschirmblechs. Wo Sie nun die vier 
Kabel anlöten müssen, sehen Sie in 
Bild 1. Es ist ratsam die Kabel nicht 
direkt anzulöten, sondern einen Zwi- 
schenstecker zu verwenden, da die 
Tastatur sonst nicht mehr von der 
Computerplatine getrennt werden 
kann. Wenn Sie dünne Litze verwen- 
den, können Sie die Abschirmung wie- 
der zusammenschrauben. Verwen- 
den Sie die obere Abdeckung nicht, 
müssen Sie den kleinen Draht im 
Oberteil des Gehäuses von. der 
Klappe des Modulschachts entweder 
abkneifen oder so verbiegen, daß er 
keinen Kontakt zur Platine hat. Dann 
setzen Sie die Platine wieder in das 
Unterteil ein und verschrauben sie 
vorsichtig. 

Wenn man die Kabel an der Tasta- 
turplatine verlötet hat, unterführt man 
sie einfach wie in Bild 2 unter der Pla- 
tine und lötet sie dort an. Ein Zwi- 
schenstecker entfällt hier, da ein Los- 
schrauben der Tastatur von der 
Gehäuseoberseite wohl in den selten- 
sten Fällen nötig wird. 

Ist alles fertig, brauchen Sie nur 
noch das Tastaturkabel wieder einzu- 
setzen und das OÖber- und Unterteil 
des Gehäuses wieder zu verschrau- 
ben. 

Nun müssen Sie endlich nicht mehr 
umständlich die <CONTROL>- 
Tasten drücken, um den Cursor über 
den Schirm zu steuern. Wenn Sie sich 
erst einmal an diese Vereinfachung 
gewöhnt haben, möchten Sie sie nicht 
mehr missen. 

(Kiersten Waldheim/rj/hf) 


[2] 


H 


Bild 3. Verdrahtet werden die zusätzlichen Tasten nach obenstehendem Schema 
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| Markt &Technik-Produkte 


erhalten Sie bei 
Ihrem Depot-Buchhändler 
1000 Berlin 31, Bundesallee 25 im Tonstudio, Dataplay, Tel. (030) 86513315 - 1000 


Berlin 30, Einemstraße 5, Plastronic GmbH, Tel. (030) 240181 = 1000 Berlin 30, Keith- 
straße 18, Computare Fachhandlung, Tel. (030) 2 13?021 - 2000 Hamburg 36, Große 


| Bleichen 19, Thalia Buchhaus, Tel. [040] 3005050 - 2000 Hamburg 1, Hermannstroße 


31, Boysen + Maasch, Tel. (040) 3005050 - 2300 Kiel, Holtenauer Straße 116, Buch- 
handlung Muehlau, Tel. (0431185085 « 2390 Flensburg, Norderstraße 94-96, ECL, Tel. 
(0451) 2818) » 2400 lübeck, Königstraße 79, Buchhandlung Weiland, Tel. (0451) 
150050 = 2800 Bremen 1, langenstraße 10, Buchhandlung Storm, Tel. (0421) 321523 
- 2940 ‘Wilhelmshaven, Marktstraße 38, Buchhandlung lohse-Eissing, Tel. (04421) 


| 41687 - 3000 Hannover |, Bahnhofstraße 13, Buchhandlung Schmorl u.v. Seefeld, Tel. 


(0511) 327651 - 3300 Brounschweig, Neve Straße 23, Buchhandlung Graff, 
Tel. (0531) 49271 » 3400 Göttingen, Weender Straße 33, Deuerlich'sche Buchhand- 
lung, Tel. (0551) 56868 - 3500 Kassel, Holländische Straße 22, Buchhandlung an der 
Hochschule, Tel. (0561) 83807 + 4000 Düsseldorf, Friedrichstraße 24-26, Stern Verlag, 
Tel. {02 11) 373033 - 4300 Essen 1, Kettwiger Strafe 33-35, Buchhandlung Baedeker, 


| Tel. (0201) 221381 » 4400 Münster, Alter Steinweg |, Regensberg’sche Buchhandlung, 


| 10202) A54270 - 5900 Siegen, Sandstroßbe 1, Buchhandlung 


Tel. (0251) 40541-5 + 4500 Osnabrück, Johannisstraße 51, Buchhandlung Acker, Tel. 
(0541) 28488 - 4600 Dortmund, \Westenhellweg 9, Buchhandlung C.L.Krüger, 
Tel. (0231) 1527358 - 4630 Bochum, Querenburger Höhe 281/Unicenter, Buchhand- 
lung Brockmeyer, Tel. (0234) 70 1360 - 4790 Foderborm, \Warburger Straße #8, Buch- 
handlung Meier+\Weber; Tel. (05251) 631 72 = 4800 Bielefeld |, Oberntorwall 25, 


| Buchhandlung Phönix GmbH, Tel. (0521) 58306-38 - 5000 Köln |, Neumarkt 24, Buch- 


handlung Gonski, Tel. (0221) 210528 - 5100 Aachen, Ursulinerstrabe 17-19, May- 
er'sche Buchhandlung, Tel. [02:41] 4777-136 = 5300 Bonn 1, Am Hof 5a, Buchhandlung 
Behrendt, Tel. (0228) 658021 + 5400 Koblenz, Schloßstraße 12, Buchhandlung Cusa- 
nus, Tel. (0261) 36239 = 5500 Trier, Fleischstraße 61-65, Akad. Buchhandlung Inter- 
bock, Tel. 10651] 43596 - 5600 Wuppertal 1, Kipdorf 32, Buchhandlung W. Finke, Tel. 
Baologh, Tel. (0271) 
55298-9 = 6000 Fronkfurt 1, Steinweg 3, Buchhandlung Naocher, Tel. [069] 298050 
- 6100 Darmstadt, Loutenschlägerstro be 4, Buchhandlung Wellnitz, Tel. (061 51] 76548 
- 6200 Wiesbaden, Friedrichstraße 21, Buchhandlung Feller+Gecks, Tel. (06121) 
30471] » 6300 Gießen, Seltersweg 83, Ferber’sche UNI-Buchhondlung, Tel. {0641} 
12001 = 5400 Fulda, Friedrichstraße ?4, Sozialwissenschaftliche Fochbuchhandlung, 
Tel. (0661) 75077 - 6450 Hanau, longstraße 47, Albertis-Hofbuchhandlung, Tel. 
(06181) 2430] - 6500 Mainz, Große Bleiche 29, Gutenberg Buchhandlung, Tel. 
(96131) 37011 - 6600 Saarbrücken, Futterstraßbe 2, Buchhandlung Bock + Seip, Tel. 
(0681) 30577 = 6700 Ludwigshafen, Bismarckstraße 98, Buchhandlung ‘Wilhelm Hof- 
mann, Tel. (0621). 51 5001 = 6800 Mannheim 1, B1,5, Buchhandlung |oeffler, Tel. (0621) 
287 12 + 7000 Stuttgart 50, Bahnhofstraße 13, Buchhandlung Stehn, Tel. {07 11] 561476 
- 7030 Böblingen, Sindelfinger Allee 25, Osiandersche Buchhandlung, = 7190 Heil- 
bronn, Kramstroße &, Buchhandlung am Markt, Tel. (07131) 68682 - 7400 Tübingen, 
Wilhelmstraße 12, Ösiondersche Buchhandlung, Tel. (0707151761 - 7410 Reutlingen, 
Kaiserpassage 8, Ösiandersche Buchhandlung, = 7500 Karlsruhe, Kaiserstraße 18, UNI 
Buchhandlung Kellner + Moessner, Tel. (0721) 69 1436 - 7600 Offenburg, Hauptstraße 
45, Buchhandlung Roth, Tel. (0781) 22097 = 7800 Freiburg, Bertholdstraße 10, Rom- 
bach Center, Tel. (0761) 4P091 - 7900 Ulm, Hirschstraße 4, Fachbuchhandlung Hof- 
mann, Tel. (0731) 60949 - 7980 Ravensburg, Wangener Straße 9%, Schauties Elektno- 
nik, Tel. (0751) 261 38 - 8000 München 2, Marienplatz, Buchhandlung Hugendubel, 
Tel. 1089) 2389-1 - 8000 München 2, Barerstraßbe 32-34, Computerbücher am Obelisk, 


| Tel. (089) 282383 - 8000 München 2, Schillerstraße 17, Pele's Computerbücher, Tel. 


(087) 555227 = 8000 München 2, Theresienstraße 43, Universitätsbuchhandlung Lach- 
ner, Tel. (089) 521340 « 8070 Ingolstadt, Theresienstraße 6, Buchhandlung Schön- 
huber, Tel. (0841) 331 46/47 = 8220 Traunstein, Ludwigstraße 3, Computerstudio 


| Gertrud Friedrich, Tel. [0851] 14767 - 8390 Possou, Kl. Exerzierplatz 4, Buchhandlung 


Pustet, Tel. [0851] 56945 - 8400 Regensburg, Gesandtenstraße 6, Buchhandlung 
Pustet, Tel. (0941) 530651 - 8500 Nömberg, Adlerstraße 10-12, Universitätsbuchhand- 
lung Büttner&Co,, Tel. [0F11) 2368-0 - 8570 Hof, leimitzer Straße 11-13, Computer- 
Center-Burger, Tel. (09281) 40075 - 8900 Augsburg, Grotfenau 4, Buchhandlung 
Pustet, Tel. (0821) 35437 - 8960 Kempten, Salzstraße 30, Kemptener Fachsortiment, 
Tel. (0831) 14413. 

Schweiz: 

3001 Bern, Neuengasse 43, Von-WVerdt-Possage, Buchhandlung Francke AG, Tel. (031) 
221717 = 3011 Bern, Morktgasse 25, Buchhandlung Scherz, Tel. (031) 226837 + 5000 
Acrau, Bahnhofstrasse 41, Buchhandlung Meissner, Tel. (054) 247151 » 6300 Zug, 
Neugasse 12, Bücher Bolmer, Tel. (042) 2141 4] - 8002 Zürich, Bleicherweg 56, Buch- 
handlung Enge, Tel. [011201 2078 - 8022 Zürich, Pelikanstrasse 10, Buchhandlung Orell 
Füssli, Tel. (01) 2118011 - 8033 Zürich, Universitätsstrasse 11, Freihofer AG, Wissen- 
schaftliche Buchhandlung, Tel. [01] 3634282 - 9001 St. Gallen, Webergasse 5, Buch- 
handlung am Rösslitor, Tel. {071} 228728. 


Österreich: 

1010 Wien, Wollzeile 11, Morawa&Co, Tel. (0222) 947541 = 1620 Wien, Heinertstro- 
Be 3, Computer Buch Shop Karl Fegerl, Tel. (0222) 245368 » 1040 ‘Wien, Karlsplatz 
13, Lehrmittelzentrum, Tel, [0222] 56780] » 1120 Wien, Schönbrunner Straße 261, Bö- 


cherzentrum, Tel. (0722) 8331 96 - 2700 Wiener Neustadt, Neue Weltgasse, WVolter | 


Hofstädter, Tel. [02622] 21550 - 3302 Amstetten, Hauptplatz 30, Kirchenstroße 3, Jo- 
hann Reisinger, Tel. (07472) 2576-0 * 3500 Krems, Obere landstrabe 8, Helmut Lainer, 
Tel. (02732) 2318 = 4020 Linz, Iondstroße 34, R. Pirngruber, Tel, (0732) 272834 « 
4840 Vöcklabruck, Stadtplatz 28, Buchhandlung Schachtner, Tel. 107672) 3467 = 
5020 Salzburg, St.-Jullen-Straßbe 2, R. Regelsberg, Tel. [0662] 73573 + 6010 Innsbruck, 
Mario-Therssien-Stabe 15, Tyrolia, Tel. (05222) 24944 = 6010 Innsbruck, Museum- 


| straße 4, Wagner’sche Universitätsbuchhandlung, Tel. (05222) 223 16 - 8010 Graz, 


Stemplergasse 3, Buchhandlung leykam, Tel. (03 16) 76676-0 = 8010 Graz, Sacher- | 


straße 6, Jos. A. Kienreich, Tel. [03 15) 76441 - 8010 Groz, Radetzkystraße 7, Volks- 
buchhandlung, Tel. (0316) 79388. 
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Daß die 8-Bit-Ataris vierstimmigen Sound 
erzeugen können, ist ja bekannt. Aber was halten 
Sie von echtem Synthesizerhall, freier 

Tor- und Hüllkurvengestaltung, 
Schlagzeugsound und Transponierautomatik? 


Wenn Sie jetzt glänzende Augen bekommen, 

ist MASIC das Richtige für Sie. Eine strukturierte 
Programmiersprache speziell für Musik und Sound. 
Und, besonders wichtig: Das, was MASIG 
hervorbringt, läßt sich mühelos für eigene Programme 
nutzen. MASIC-Programme arbeiten im Interrupt, 
ohne z.B. ein gleichzeitig laufendes Basic- 





Da haben Sie gerade ein herrliches Bild entdeckt, 

wie geschaffen als Titelgrafik für Ihr Basic-Programm. 
Oder Sie würden zu gern einmal mit einem 
Malprogramm ein wenig am Portrait dieser Dame auf 
der Illustrierten-Titelseite herummanipulieren. 


Sie haben einen 8-Bit-Atari und einen 

Epson-FX-80- kompatiblen Drucker? Dann halten 
Sıe sich fest, denn scantronic zaubert ein 

Abbild Ihrer Papiervorlagen mit Hilfe Ihres Druckers 
in Graphics 9 auf den Bildschirm und/oder 

die Diskette. 


scantronic, unser Scanner, wird anschlußfertig 
geliefert, komplett mit Steuersoftware (Disk), 
D M ——] einem fähigen Graphics-9-Malprogramm in Turbo-Basic 





AL, 16-Graustufen-Häardeopy und deutscher Anleitung. 





Endlich! Zwei neue deutsche 
Textadventures, 
die Sie begeistern werden! 


Alptraum 

Sie schlüpfen in die Rolle des Besitzers einer kleinen Flugli- 
nie. Sein nächtlicher Alptraum, in dem sich nach und nach 
die bedrohlichen Gefahren herauskristallisieren, ist Ihr 
Spiel. Je mehr Sie im Traum erfahren, desto besser. Je 
schneller der Traum zu Ende ist, desto quälender wird die 
zurückbleibende Ungewißheit sein. 


Der leise Tod 

Sie sind Ray Cooper, von Beruf Privatdetektiv, und besitzen 
ein kleines Büro in der Themsestadt London. Eines Tages 
erhalten Sie ein Telegramm von einem guten Freund im fer- 
nen Amerika. Ein heikler und gefährlicher Auftrag wartet auf 
Sie. Setzen Sie sich in Ihren Ferrari und brechen Sie auf - ob 
Sie jemals nach London zurückkehren, können wir Ihnen 
nicht sagen. 


Beide Adventures laufen auf allen 


Computern der Atari-XL- und 39 
XE-Serie ab 64 KByte RAM. pa | m 
Pro Diskette DM 5 




















Ich wünsche folgende Bezahlung: 

U Nachnahme (zurüglich5.70 DM Versandkosten) 

DL Vorauskasse (zuzüglich 3.- DIM Versandkosten, 
ab 100 DM Bestellwert versandkostenfrei} 

Bei Vorauskasse bitte Scheck beileger,. 

Saltware st vom Umtausch ausgeschlossen. 





































Programm zu stören. 
Zeigen Sie anderen Heimcomputer-Musikfreunden, D M Ag [__) 
was eine Harke ist — mit MASIC! Disk r| 





Software-Bestellschein 


Ich bestelle aus dem Diabolo-Versand folgende Software: 


Marne des Bestellers 


Anschrift 


Dabrmw'Unterschrt 


Coupon ausschneiden, auf Postkarte kleben 


und einsenden an: 


R+ESoftware, PF 1640, 7518 Bretten. 
Eine Abteilung des Verlags Rätz-Eberle GeobR. 
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Der neue ATARI 800 XE mit Supergrafik ist 
jetzt da. Der Computer für alle, die erster 
Klasse fliegen wollen. 


Das sind die technischen Details des neuen 
Spitzenmodells der 64er Klasse: 
INNENRAUM: 64 kBytes Arbeitsspeicher 
im RAM 

COCKPIT: 24 kBytes. ROM-resident. 

Für Betriebssystem und Basic. 
ZENTRALTRIEBWERK: 6502 Prozessor der 
C-Version 
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ZUSATZTRIEBWERKE: 

POKEY- für den Sound 

GTIA - für die Grafik 

ANTIC - für den Bildschirm 

PIAA  -für die Ein-/Ausgabe 

SCHUB: 1,79 Megahertz 

ZULADUNG: Datasette, Floppy, Drucker, 
Monitor, Fernseher, Joystick, Lichtgriffel, 
Maltablett, Modulschacht . 

SPANNWEITE: Musik, Grafik, Spiele, Text- 
verarbeitung, Kalkulation, Lernhilfe, 
Archivierung, Verwaltung und, und, und... 
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D:s sind viele tausend weitere Programme 
der erfolgreichen ATARI XE/XL-Serie. 
ATARI 800 XE mit Supergrafik. Das ist 
Computertechnologie für Menschen von 


heute zum sagenhaft niedrigen Preis. 
Den neuen ATARI 800 XE gibt es ab jetzt im 
Handel. 


J\ ATARI 


. ... wir machen Spitzentechnologie preiswert. 

















